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104 KO PROGRAM INFORMATION 

105 

106 

107 U1 ABSTRACT 

108 

109 

110 THIS PROGRAM WAS DESIGNED USING A "BOTTOM UP" APPROACH 

111 STARTING WITH THE SMALLEST SEGMENT OF MEMORY MANAGMENT 

112 LOGIC POSSIBLE AND BUILDING TO COVER ALL OF THE LOGIC. 

113 THE DIAGNOSTIC WILL PROVIDE ENOUGH INFORMATION SUCH THAT 

114 BY DEDUCTION, THE FAILURE CAN BE ISOLATED TO A SMALL 

115 SEGMENT OF THE MEMORY MANAGEMENT LOGIC. 
116 

117 THE PROGRAM BEGINS BY TESTING SOME OF THE INTERNAL CPU 

118 DATA AND ADDRESS PATHS AND ADDRESS DETECTION LOGIC, THEN 

119 WORKS OUTWARD THROUGH THE MEMORY MANAGEMENT REGISTERS. 

120 AFTER THE REGISTERS ARE FOUND TO BE USEABLE, RELOCATION 

121 (CONSTRUCTION OF PHYSICAL ADDRESSES FROM A VIRTUAL ADDRESS 

122 AND THE ASSOCIATED PAR/PDR INFORMATION) IS TESTED FOLLOWED 

123 BY TESTING OF THE ABORT AND STATUS SEGMENTS OF LOGIC. 

124 FINALLY. CHECKS OF SPECIAL ABORT SEQUENCES AND TESTING OF 

125 THE MFPI/MTPI INSTRUCTIONS ARE DONE. 
126 

127 1.2 REQUIREMENTS 

128 

129 

130 A PDP 1 1/34 PROCESSOR WITH A MINIMUM OF 1 6K OF MEMORY 

131 AND A CONSOLE TERMINAL ARE REQUIRED TO RUN THE PROGRAM 

132 UNLESS THE PROGRAM IS RUNNING UNDER APT OR ACT IN WHICH 

133 CASE THE CONSOLE TERMINAL IS NOT NECESSARY. 

134 

135 U3 RELATED DOCUMENTS AND STANDARDS 

136 

137 

138 1 . ACT1 1/XXDP PROGRAMMING SPECIFICATION 

139 2. STANDARD APT SYSTEM TO A PDP1 1 DIAGNOSTIC INTERFACE 

140 3. DIAGNOSITC ENGINEERING STANDARDS AND CONVENTIONS 

141 4. PDP11 MAINDEC SYSMAC PACKAGE 

142 5. XXDP USER'S MANUAL 

143 

144 U4 PRELIMINARY PROGRAMS 

145 

146 

147 BEFORE lilS MEMORY MANAGEMENT DIAGNOSITC IS RUN, THE 

148 FOLLOWING CPU DIAGNOSTICS SHOULD BE RUN: 

149 

150 MD-11-DFKAA PDP 11/34 3ASIC CPU TESTS 

151 MD-11-DFKAB PDP 11/34 TRAPS TESTS 
152 

153 ALSO, ONE OF THE MAIN MEMORY DIAGNOSTICS SHOULD 3E RUN 

154 TO SCAN AT LEAST THE FI^ST 1SX TO SEE THAT A PROGRAM 

155 CAN BE EXECUTED. 

156 ^ " 

157 2.0 OPERATING INSTRUCTIONS 

159 
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160 2.1 LOADING PROCEDURES 

161 , 

162 

163 THE PROGRAM IS SUPPLIED ON THE DIAGNOSTIC LOAD MEDIA. 

164 REFER TO THE XXDP USER'S MANUAL FOR FURTHER INFORMATION. 

165 FOR USE WITH ACT OR APT, REFER TO THEIR RESPECTIVE 

166 DOCUMENTS. THE PROGRAM CAN ALSO BE DIRECTLY LOADED 

167 USING THE ABSOLUTE LOADER AND THE BINARY PAPER TAPE. 
168 

169 2«2 STARTING PROCEDURES 

170 

171 

172 THE PROGRAM IS STARTED BY LOADING ADDRESS 200 AND 

173 STARTING. IF THE PROCESSOR HAS THE OPTIONAL PROGRAMMER'S 

174 CONSOLE, THE SWITCH REGISTER SHOULD BE SET ACCORDING TO 

175 SECTION 2.3 BEFORE THE PROGRAM IS STARTED. IF THERE 

176 IS NO HARDWARE SWITCH REGISTER, THE PROGRAM WILL USE THE 

177 SOFTWARE SWITCH REGISTER AT LOCATION 176 (LOCATION 174 

178 WILL BE USED AS THE SOFTWARE DISPLAY REGISTER). IN THAT CASE 

1 79 THE PROGRAM WILL ASK FOR THE INITIAL SWITCH REGISTER 

180 VALUE BY TYPING "SWR^ XXXXXX !N&W= " AFTER TyPING 

181 THE NAME OF THE PROGRAM (XXXXXX = fl^E OCTAL CONTENTS OF 

182 LOCATION 176) . (SEE SECTION 2.4) 
1 83 

184 ALSO THE PROGRAM CAN BE MADE TO USE THE SOFTWARE SWITCH 

185 REG. EVEN IF THE HARDWARE SWITCH REG. IS PRESENT BY LOADING 

186 "177777" INTO THE HARDWARE SWITCH REG. BEFORE STARTING 

187 THE PROGRAM. 

1 88 

189 2.r CONTROL SWITCH SETTINGS 

190 

191 

192 SWITCH OCTAL VALUE USE 

194 SW15 100000 HALT ON ERROR 

195 THIS SWITCH WHEN SET WILL HALT 

196 THE PROCESSOR WHEN AN ERROR IS 

197 DETECTED AFTER THE ERROR MESSAGE 
19R HAS BEEN TYPED. PRESSING CONTINUE 

199 WILL RESUME TESTING (SEE SECTION 

200 3.1 ABOUT LOADING THE SWITCH REQ 

201 BEFORE CONTINUING) • 
202 

203 SW14 040000 LOOP ON TEST 

204 THIS SWITCH WHEN SET WILL 

205 CAUSE THE PROGRAM TO LOOP ON 

206 THE CURRENT SUBTEST. 
207 

208 SW13 020000 INHIBIT ERROR TYPEOUTS 

209 THIS SWITCH WHEN SET WILL 

210 INHIBIT THE TYPING OF ERROR 

21 1 MESSAGES. 

212 

213 SW12 010000 INHIBIT TRACE TRAP 

214 THIS SWITCH WHEN SET WILL 

215 INHIBIT T-BIT TRAPPING WHICH 
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216 NORMALLY TAkES PLACE DURING 

217 EVERY OTHER PASS STARTING 

218 WITH THE THIRD PASS. 
219 

220 SW11 004000 INHIBIT SUBTEST ITERATIONS 

221 -HIS SWITCH WHEN SET INHIBITS 

222 ITERATIONS OF EACH SUBTEST AFTER 

223 THE FIRST PASS. IF THIS SWITCH 

224 IS NOT SET, EACH SUBTEST IS RUN 

225 200. TIMES. 
226 

227 SW10 002000 BELL ON ERROR 

228 THIS SWITCH WHEN SET WILL RING 

229 THE CONSOLE TERMINAL BELL WHEN 

230 AN ERROR HAS BEEN DETECTED. 

231 

232 SW9 001000 LOOP ON ERROR 

233 THIS SWITCH WHEN SET WILL 

234 CAUSE THE PROGRAM TO LOOP ON THE 

235 FIRST FAILURE WHICH IS ENCOUNTERED 

236 EVEN IF THE FAILURE IS INTERMITtANT 

237 

238 SW8 000400 LOOP ON TEST IN SWR<7:0> 

239 THIS SWITCH WHEN SET WILL 

240 CAUSE THE PROGRAM TO LOOP ON THE 

241 TEST WHOSE TEST NUMBER IS SET 

242 IN BITS 7-0 OF THE SWITCH REG. 
243 

244 2*4 LOADING THE SWITCH REGISTER 

245 

246 

247 THE HARDWARE SWITCH REGISTER PROVIDED WHEN THE OPTIONAL 

248 PROGRAMMER'S CONSOLE IS PRESENT IS LOADED DIRECTLY FROM 

249 THE CONSOLE KEYPAD BY DEPRESSING THE "LSR" KEY. THE 

250 VALUE OF THE HARDWARE SWITCH REG. CAN BE CHANGED ANY 

251 TIME WHETHER THE PROGRAM IS RUNNING OR NOT. 
252 

253 TO LOAD THE SOFTWARE SKETCH REG. WHILE THE PROGRAM IS 

254 RUNNING, A CONTROL G C^G) SHOULD BE TYPED ON THE CONSOLE 

255 TERMINAL. (THE "SCOPE" AND "ERROR" ROUTINES CHECK TO SEE 

256 IF A '^G HAS BEEN TYPED. ) THE ORIGINAL VALUE OF THE SOFTWARE 

257 SWTICH REG. WILL BE REQUESTED AS MENTIONED IN SECTION 2.2. 
258 

259 IN RESPONSE TO A "G OR AT THE BEGINNING OF THE PROGRAM, THE 

260 PROGRAM WILL TYPE: 

261 

262 SWR = XXXXXX NEW = 

263 

264 WHERE "XXXXXX" IS THE CURRENT OCTAL CONTENTS OF LOC. 176. 

265 THE OPERATOR MAY THEN TYPE ANY ONE OF THE FOLLOWING: 

266 XXXXXX<CR> ONE TO SIX OCTAL DIGITS FOLLOWED BY A 

267 CARRIAGE RETURN WHICH WILL BE LOADED 

268 AS THE NEW VALUE FOR THE SWITCH REG. 

269 <CR> JUST A <CR>, LEAVES THE SWITCH REG. 

270 AS IT IS. 

271 XXX-^U A CONTROL-U C^U) WILL CAUSE ALL OF THE f 
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272 DIGITS TYPED SO FAR TO BE IGNORED. 

273 WILL CAUSE THE PROGRAM TO TYPE THE PRESENT 

274 TEST AND PASS NUMBERS, REQUEST A NEW VALUE 

275 FOR THE SWITCH REG.. AND JUMP TO THE END- 

276 OF-PASS ROUTINE SO THE PROGRAM WILL GO DIRECTLY 

277 TO THE NEXT PASS WITH A NEW SW. REG. VALUE 

278 <ILL.CHAR> ANY CHARACTER TYPED WHICH IS NOT ANY OF THE 

279 ABOVE OR AN OCTAL DIGIT WILL CAUSE THE PROGRAM 

280 TO TYPE A "?<CRLF>" AND REACT AS THOUGH A 

281 "^U HAD BEEN TYPED. 
282 

283 NOTE: RECOGNITION OF A ^G MAY BE HAMPERED BY 

284 EXECUTION OF A COUPLE "RESET" INSTRUCTIONS 

285 WITHIN THE PROGRAM. 

286 

287 2.5 EXECUTION TIMES 

288 

289 

290 THE RUN TIME FOR A SINGLE PASS WITH NO ITERATIONS 

291 OR TRACE TRAPPING IS APPROXIMATELY 5 SECONDS. 

292 

293 THE RUN TIME FOR A SINGLE PASS WITH ITERATIONS 

294 AND TRACE TRAPPING ENABLED IS APPROXIMATELY 3 1/4 MINUTES. 

295 

296 3.0 ERROR INFORMATION 

297 

298 

299 3.1 ERROR REPORTING PROCEDURES 

300 

301 

302 IF AN ERROR IS DETECTED, THE PROGRAM WILL TRAP TO THE 

303 ERROR HANDLING ROUTINE ($ERROR). THE VALUE OF BITS 

304 15,13,10, AND 9 IN THE SWITCH REGISTER ARE CONSIDERED 

305 IN REPORTING AN ERROR (SEE SECTION 2.3) . THE 

306 ERROR INFORMATION WILL BE TYPED UNLESS SW13 = 1 . 
307 

303 IF SWiS = 1, THE PROCESSOR WILL HALT AFTER THE ERROR IS 

309 REPORTED. IF THE CONTENTS OF THE SOFTWARE SWITCH REGISTER 

310 ARE TO BE CHANGED, A '^G SHOULD BE TYPED BEFORE PRESSING 

31 1 "CONTINUE" TO RESUME TESTING. 
312 

313 IF SW9 = 1 (LOOP ON ERROR) , THE PROGRAM WILL GO TO THE 

314 ADDRESS CONTAINED IN LOCATION "SLPERR" . AFTER REPORTING 

315 THE ERRLr^. "$LPERR" IS SET BY EACH "SCOPE" CALL AND IS 

316 SET DIRECTLY DURING SOME SUBTESTS TO PROVIDE THE SMALLEST 

317 LOOP FOR LOOPING ON ERROR. IF S-..9 = 0, THE PROGRAM WILL 

318 RETURN TO THE INSTRUCTION FOLLOWING THE ERROR CALL. 

319 (SEE SECTION 5.3 FOR MORE ON "LOOP ON ERROR" ) . 
320 

321 3.k: INTERPRETING ERROR REPORTS 

322 

323 

324 EVERY ERROR REPORT TYPES THE NUMBER OF THE TEST IN WHICH 

325 THE ERROR TOOK PLACE (TESTNO) AND THE LOCATION OF THE 

326 ERROR CALL (ERRORPC). THESE TWO VALUES PINPOINT THE 

327 PLACE IN THE CODE THAT THE ERROR OCCURRED. BY REFERRING 
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328 TO THE PROGRAM LISTING, THE OPERATOR CAN THEN READ THE 

329 COMMENTS ASSOCIATED WITH THAT PARTICULAR ERROR AND SUBTEST. 

330 A DESCRIPTION OF THE TEST FOUND IN THE PROGRAM LISTING 

331 WILL ALSO PROVIDE THE OPERATOR WITH INFORMATION ON THE LOGIC 

332 AND FUNCTIONS BEING TESTED. 
333 

334 EVERY ERROR REPORT ALSO TYPES AN ERROR MESSAGE 

335 GIVING A VERBAL DESCRIPTION OF THE ERROR THAT HAS 

336 BEEN DETECTED. 
337 

338 BY USING THE COMMENTS AND TEST DESCRIPTION FOUND IN 

339 THE PROGRAM LISTING TO DETERMINE WHAT FUNCTION OR 

340 LOGIC WAS BEING TESTED, THE OPERATOR CAN THEN REFER 

341 TO THE ENGINEERING DRAWINGS TO ISOLATE THE PROBABLE 

342 CAUSE FOR THE FAILURE. 
343 

344 3.3 SAMPLE ERROR REPORT 

345 

346 

347 BELOW IS AN EXAMPLE OF AN ERROR WHICH COULD HAVE 

348 OCCURRED DURING EXECUTION OF THE PROGRAM: 

349 

350 MEM. MGMT . REG. BITS NOT SET CORRECTLY 

351 REGISTR L'ROTE READ READ-( BINARY ) 

352 ADDRESS (OCTAL) (OCTAL) 5432109876543210 TESTNO ERRORPC 

353 177572 040000 060000 0110000000000000 000012 022060 
354 

355 WE SEE THAT THE ERROR OCCURRED IN TEST 12 AT LOACTION 

356 022060. THE "REGISTR ADDRESS" TELLS US THAT WE WERE 

357 TESTING MEMORY MANAGEMENT ' S STATUS ROISTER (SRO) . 

358 IN THE LISTING, THE TEST DESCRIPTION SAYS THAT THE 

359 ERROR BITS (BITS <15:13>) OF SRO WERE BEING SET AND 

360 CLEARED INDIVIDUALLY. THE ERROR REPORT SAYS WE TRIED 

361 TO SET BIT 14 BY WRITING "040000" TO SRO BUT WHEN WE 

362 READ IT BACK WE READ "060000" . IT APPEARS THAT BIT 13 IS 

363 STUCK AT "1" OR IT IS GETTING SET WHEN BIT 14 IS SET 

364 TO "1". ERROR REPORTS BEFORE AND AFTER THIS ONE COULD 

365 TELL US WHICH IS THE CASE. 
366 

367 4.0 MISCELLANEOUS INFORMATION 

368 

369 

370 4.1 ACT/APT/XXDP COMPAT ABI LI TY 

371 

372 

373 THE PROGRAM IS FULLY ACT AND APT COMPATABLE 

374 AND IS SUPPORTED UNDER THE XXDP PACKAGE. 
375 

376 4.2 END-OF-PASS MESSAGE 

377 

378 

379 AT THE END OF EACH PASS OF THE PROGRAM THE PASS NUMBER 

380 AND TOTAL NUMBER OF ERRORS SINCE THE LAST END-OF-PASS ARE 

381 REPORTED IN THE ENO-OF--PASS MESSAGE. FOR EXAMPLE: 
382 

383 END OF PASS #2 TOTAL ERRORS SINCE LAST REPORT 
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384 

385 THAT WOULD INDICATE THAT PASS TWO WAS JUST COMPLETED 

386 AND NO ERRORS WERE DETECTED DURING THAT PASS. BOTH 

387 THE PASS NUMBER AND NUMBER OF ERRORS ARE DECIMAL NUMBERS. 
388 

389 4*3 T-BIT TRAPPING 

390 

391 

392 THE "T-BIT" (BIT 4) IN THE PROCESSOR STATUS WORD IS SET 

393 BY AN "RTI" IN THE END-OF-PASS ROUTINE FOR EVERY OTHER PASS 

394 BEGINNING WITH THE THIRD PASS (PASSES 3,5.7,9...)- T-BIT 

395 TRAPPING CAN BE INHIBITED BY SETTING BIT 12 « 1 IN THE SWITCH 

396 REGISTER (SEE SECTION 2.4). 
397 

398 4.4 POWER FAILURE HANDLING 

399 

400 

401 IF A POWER FAIL OCCURS (FOLLOWED BY A POWER UP). THE 

402 MESSAGE "POWER FAILURE-RESTARTING" IS TYPED OUT AND 

403 THE PROGRAM WILL RESTART EXECUTION AT "START:" (THE 

404 VERY BEGINNING OF THE PROGRAM. IF THE SOFTWARE 

405 SWITCH REGISTER IS BEING USED, ITS CONTENTS WILL BE 

406 RESTORED. IF THERE IS A HARDWARE SWITCH REGISTER, 

407 THERE IS NO WAY TO RESTORE THE VALUE OF THE SWITCH 

408 REGISTER SO THE OPERATOR MUST RELOAD IT FROM THE CONSOLE. 
409 

410 4.5 PHYSICAL BUS ADDRESS CONSTRUCTION 

41 1 

412 

413 BELOW IS A SIMPLIFIED DIAGRAM OF HOW THE MEMORY 

414 MAMAGEMENT LOGIC CONSTRUCTS A PHYSICAL BUS ADDRESS 

415 USING THE VIRTUAL ADDRESS AND THE PAGE ADDRESS REGISTER. 

416 THE PAGE DESCRIPTOR REGISTER SELECTED WILL CONTAIN THE 

417 PAGE EXPANSION, LENGTH, AND ACCESS INFORMATION. 
418 

419 12 11 10 09 08 07 06 05 04 03 02 01 00 

420 

421 / 1 I 1 1 1 1/ 1 1 1 1 1 0/ VBA* 

423 I 

424 (ADDED TO) I 

425 I 

426 11 10 09 08 07 06 05 04 03 02 01 00 I 

427 I 

428 /0001 01 00000 1/ I PAR** 

429 I 

430 I I 

431 I I 

432 V V 

433 17 16 15 14 13 12 11 10 09 08 07 06 05 04 03 02 01 00 

434 

435 /0001 100000001 1 1 1 1 0/ PBA 

436 

437 

438 VBA BITS <15:13> SELECT THE APPROPRIATE PAR AND PDR 

439 ♦*« PSW MODE BIT 01 (BIT 15) SELECTS THE USER (»1) OR 
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440 KERNEL (=0) SET OF PAR'S/PDR'S 

441 

442 5.0 PROGRAM DESCRIPTION 

443 

444 

445 5,1 SUBROUTINES USED BY THIS PROGRAM 

446 

447 

448 FOLLOWING IS A LIST OF THE SUBROUTINES AND HANDLERS USED 

449 BY THIS PROGRAM THAT ARE NOT PROVIDED BY THE "SYSMAC 

450 PACKAGE" . DETAILS OF THE SUBROUTINES UNIQUE TO THIS 

451 PROGRAM MAY BE FOUND IN THE PROGRAM LISTING. REFER TO 

452 THE "SYSMAC" DOCUMENT AND PROGRAM LISTING FOR THE OTHER 

453 ROUTINES. 
454 

455 1. TURN OFF T-BIT AND SAVE CURRENT PSW 

456 2. TURN ON T-BIT AND RESTORE PREVIOUS PSW 

457 3. SET ALL WRITlABLE BITS IN ALL PAR/PDR'S 

458 4. READ AND COMPARE KERNEL AND USER PAR/PDR'S 

459 5. CONVERT VIRTUAL ADDRESS TO PHYSICAL ADDRESS 
460 

461 5.2 PROGRAM LISTING 

462 

463 

464 A TABLE OF CONTENTS APPEARS AT THE BEGINNING OF THE LISTING 

465 WHICH CONTAINS THE NAMES OF EACH SECTION. SUBTEST. AND 

466 ROUTINE AND THE LINE NUMBERS CORRESPONDING TO THE START OF 

467 EACH. 

468 

469 FOLLOWING THIS SECTION OF DOCUMENTATION IS THE ACTUAL 

470 PROGRAM LISTING COMPLETE WITH SUBTEST DESCRIPTIONS AND 

471 "CODING COMMENTS" . 
472 

473 5.3 USING THE PROGRAM TO DIAGNOSE A FAULT 

474 

475 

476 WHEN AN ERROR OCCURS. ONE OF THE THINGS THAT'S IMPORTANT 

477 TO NOTE IS WHAT PASS THE ERROR OCCURRED ON. IF THE PASS 

478 NUMBER IS ODD AND IS THREE OR GREATER, THE ERROR MIGHT BE 

479 T-BIT SENSITIVE. TRY RUNNING THE PROGRAM AGAIN WITH BIT 

480 12 OF THE SWITCH REG. EQUAL TO "1" TO INHIBIT T-BIT 

481 TRAPPING. IF THE PASS NUMBER IS GREATER THAN ONE, THE 

482 ERROR MAY BE ITERATION SENSITIVE. TRY RUNNING THE PROGRAM 

483 AGAIN WjliH BIT 1 1 OF THE SWITCH REG. EQUAL TO "1 " TO INHIBIT 

484 ITERATIONS. THESE HINTS SHOULD HELP YOU DETERMINE WHAT MAKES 

485 THE MACHINE FAIL AND WHEN. 
486 

487 IF YOU HAVE BEEN RUNNING WITH BIT 15 OF THE SWITCH 

488 REG. EQUAL TO "O". THEN YOU ARE ABLE TO LOOK AT ALL 

489 THE ERRORS THAT MAY BE RELATED TO THE FAULT YOU ARE 

490 DIAGNOSING. A FAULT IN AN EARLIER TEST MAY RESULT IN 

491 ERRORS DURING LATER TESTS WHICH MAY GIVE YOU MORE 

492 CLUES ABOUT THE NATURE OF THE FAULT. NOW USE THE METHOD 

493 OUTLINED IN SECTION 3.2 FOR EACH ERROR TO GATHER AS 

494 MUCH INFORMATION AS POSSIBLE. 



495 
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496 

497 

498 

499 ■ 

500 

501 

502 

503 

504 

505 

506 

507 

508 

509 

510 

511 

512 

513 # 
514 



NOW TO TEST YOUR IDEAS ON THE CAUSE OF THE FAILURE. 
YOU MAY WANT TO SCOPE THIS ERROR CONDITION. SET BIT 09 
OF THE SWITCH REG. EQUAL TO "1" TO LOOP ON THE ERROR. 
FOR AN EVEN TIGHTER SCOPE LOOP THE ERROR CALL CAN BE 
REPLACED WITH A BRANCH (REFER TO COMMENTS BY ERROR CALLS 
IN THE PROGRAM LISTING) . 

OR YOU COULD LOOP ON THE TEST BY EITHER SETTING BIT 14 
OF THE SWITCH REG. EQUAL TO "1" OF BY SETTING BIT 08 OF THE 
SWITCH REG. EQUAL TO " 1 " AND THEN SETTING THE TEST NUMBER 
IN BITS 07-00 OF THE SWITCH REG. YOU WILL PROBABLY WANT TO 
INHIBIT ERROR TYPEOUTS BY SETTING BIT 13 OF THE SWITCH REG. 
EQUAL TO "1". 
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515 

516 .TITLE CFKTHBO POP 11/34 MEM MGNT DIAG 

517 ;* 

518 ;*THIS PROGRAM WhS ASSEMBLED USING THE POP-11 MAINDEC SYSMAC 

519 ;*PACKAGE (MAINDEC-1 1-DZ0AC-C3) , JAN 19, 1977. 

520 ;* 

521 .SBTTL OPERATIONAL SWITCH SETTINGS 

522 ;* 

523 SWITCH USE 

•524 "~ 

525 ;* 15 HALT ON ERROR 

526 I* 14 LOOP ON TEST 

527 1* 13 INHIBIT ERROR TYPEOUTS 

528 ;* 12 INHIBIT TRACE TRAP 

529 ;* 11 INHIBIT ITERATIONS 

530 ;* 10 BELL ON ERROR 

531 ;* 9 LOOP ON ERROR 

532 ;* 8 LOOP ON TEST IN SWR<7:0> 

533 .SBTTL BASIC DEFINITIONS 
534 

535 ;*INITIAL ADDRESS OF THE STACK POINTER *** 1100 *** 

536 001100 STACK* 1100 

537 .EOUIV EMT, ERROR ;;BASIC DEFINITION OF ERROR CALL 

538 .EQUIV lOT, SCOPE ;;BASIC DEFINITION OF SCOPE CALL 

539 

540 ; ♦MISCELLANEOUS DEFINITIONS 

541 000011 HT= 11 ;;CODE FOR HORIZONTAL TAB 

542 000012 LF= 12 ; ;CODE FOR LINE FEED 

543 000015 CR= 15 JjCODE FOR CARRIAGE RETURN 

544 000200 CRLFs 200 ;;CODE FOR CARRIAGE RETURN-LINE FEED 

545 177776 PS= 177776 PROCESSOR STATUS WORD 

546 .EOUIV PS.PSW 

547 177774 STKLMTs 177774 ;;STACK LIMIT REGISTER 

548 177772 PIRO» 177772 PROGRAM INTERRUPT REQUEST REGISTER 

549 177570 DSWR» 177570 ;;HARDWARE SWITCH REGISTER 

550 177570 DDISP« 177570 ;; HARDWARE DISPLAY REGISTER 
551 

552 ;*GENERAL PURPOSE REGISTER DEFl.HTIONS 

553 000000 R0= %0 ;;GENERAL REGISTER 

554 000001 R1= %1 ;;GENERAL RECISTER 

555 000002 R2» %2 ; {GENERAL REGISTER 

556 000003 R3= %3 ; {GENERAL REGISTF.R 

557 000004 R4= %4 ; {GENERAL REGISTER 

558 000005 R5« %5 {{GENERAL REGISTER 

559 000006 R6= %6 { {GENERAL REGISTER 

560 000007 R7= %7 {{GENERAL REGISTER 

561 000005 SPs %6 {{STACK POINTER 

562 000007 PC= %7 {{ PROGRAM COUNTER 
563 

564 {♦PRIORITY LEVEL DEFINITIONS 

565 000000 PROa {{PRIORITY LEVEL 

566 000040 PR1» 40 {{PRIORITY LEVEL 1 

567 OOO'OO PR2« 100 {{PRIORITY LEVEL 2 

568 000140 PR3« 140 {{PRIORITY LEVEL 3 

569 000200 PR4« 200 {{PRIORITY LEVEL 4 

570 000240 PR5« 240 ; {PRIORITY LEVEL 5 
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571 000300 PR6= 300 {{PRIORITY LEVEL 3 

572 000340 PR7» 340 {{PRIORITY LEVEL 7 
573 

574 {*"SWITCH REGISTER" SWITCH DEFINITIONS 

575 100000 SW15= 100000 

576 040000 SW14= 40000 

577 020000 SW13= 20000 

578 010000 SW12* 10000 

579 004000 SWIls 4000 

580 002000 SW10= 2000 

581 001000 SW09= 1000 

582 000400 SW08= 400 

583 000200 SW07= 200 

584 000100 SW06» 100 

585 000040 SW05= 40 

586 000020 SW04= 20 

587 000010 SW03* 10 

588 000004 SW02= 4 

589 000002 SW01« 2 
5y0 000001 SWOO* 1 

591 .EOUIV SW09,SW9 

592 .EOUIV SWOB.SWB 

593 .EOUIV SW07,SW7 

594 .EOUIV SW06,SW6 

595 .EOUIV SW05,SW5 

596 .EOUIV SW04,SW4 

597 .EOUIV SW03,SW3 

598 .EQUIV SW02,SW2 

599 .EQUIV SW01,SW1 

600 .EQUIV SWOO.SWO 
601 

602 {•DATA BIT DEFINITIONS (BITOO TO BIT15) 

603 100000 BIT15« 100000 

604 040u00 BIT14S 40000 

605 020000 BIT13= 20000 

605 010000 BIT12= 10000 
607 004000 BIT11= 4000 

606 002000 BIT10= 2000 

609 001000 BIT09= 1000 

610 000400 BIT08* 400 

611 000200 BIT07» 200 

612 000100 BIT06* 100 

613 000040 BITOSa 40 

614 000020 B!T04a 20 

615 000010 BIT03»= 10 

616 000004 BIT02» 4 

617 000002 BITOI" 2 

618 000001 BITOO" 1 

619 .EOUIV BIT09,BIT9 

620 .EWUIV BIT08.BIT8 

621 .EQUIV BIT07,BIT7 

622 .EOUIV BIT06,BIT6 

623 .EQUIV BITOS.BITS 

624 .EQUIV BIT04,BIT4 

625 .EQUIV BIT03,BIT3 

626 .EQUIV BIT02.BIT2 
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SEQ 0014 



627 

628 

629 

630 

631 

632 

633 

634 

635 

636 

637 

638 

639 

640 

641 

642 

643 

644 

645 

646 

647 

648 

649 

650 

651 

652 

653 

654 

655 

656 

657 

658 

659 

660 

661 

662 

663 

664 

665 

666 

667 

668 

669 

570 

671 

672 

673 

674 

675 

676 

677 

678 

679 

680 

681 

682 



000004 
000010 
000014 
000014 
000014 
000020 
000024 
000030 
000034 
000"60 
000064 
000240 



177572 
177574 
177576 
172516 



177600 
177602 
177604 
177606 
177610 
177612 
177614 
177616 



177640 
177642 
177644 
177646 
177650 
177652 
177654 
177656 



172300 
172302 
172304 



.EOUIV 
.EOUIV 

;*BASIC 

ERRVEC= 

RESVEC* 

TBITVECs 

TRTVEC* 

BPTVEC« 

IOTVEC» 

PWRVEC- 

EMTVEC" 

TRAPVECs 

TKVEC« 

TPVEC" 

PIROVEC' 

.SBTTL 



BIT01 ,BIT1 
BITOO.BXTO 

"CPU" TRAP VECTOR 
4 
10 
14 
14 
14 
20 
24 
30 
34 
60 
64 
240 

MEMORY MANAGEMENT 



ADDRESSES 

TIME OUT AND OTHER ERRORS 
RESERVED AND ILLEGAL INSTRUCTIONS 
"T» BIT 
TRACE TRAP 

BREAKPOINT TRAP (BPT) 
INPUT/OUTPUT TRAP (lOT) ••SCOPE** 
POWER FAIL 

EMULATOR TRAP (EMT) ♦♦ERROR** 

"TRAP" TRAP 

TTY KEYBOARD VECTOR 

TTY PRINTER VECTOR 

PROGRAM INTERRUPT REQUEST VECTOR 

DEFINITIONS 



;*KT11 VECTOR ADDRESS 
MMVEC- 250 

;«KT11 STATUS REGISTER ADDRESSES 

SRO« 177572 
SR1» 177574 
SR2» 177576 
SR3« 172516 

}*! >ER -I" PAGE DESCRIPTOR REGISTERS 

UIPDRO= 177600 
UIPDR1* 177602 
UIPDR2= 177604 
UIPDR3* 177606 
UIPDR4" 177610 
UIPDR5* 177612 
UIPDR6» 177614 
UIPDR7- 177616 

.••USER -I" PAGE ADDRESS REGISTERS 



UIPARO« 
UIPAR1" 
UIPAR2» 
UIPAR3S 
UIPAR4« 
UIPARSs 
UIPAR6« 
UIPAR7" 



177640 
177642 
177644 
177646 
177650 
177652 
177654 
177656 



; •KERNEL "I" PAGE DESCRIPTOR REGISTERS 

KIPDR0> 172300 
KIPDR1* 172302 
KIPDR2S 172304 
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SEQ 001 S 



683 




172306 


KIPDn3« 172306 


684 




172310 


KIPDR4* 172310 


685 




172312 


KIPDR5- 172312 


686 




172314 


KIPDR6« 172314 


687 




172316 


KIPDR7» 172316 


688 








689 






;*KERNEL "I" PAGE ADDRESS REGISTERS 


690 








691 




172340 


KIPARO* 172340 


692 




172342 


KIPARIs 172342 


693 




172344 


KIPAR2= 172344 


694 




172346 


KIPAR3« 172346 


695 




172350 


KIPAR4- 172350 


696 




172352 


KIPARS" 172352 


697 




172354 


KIPAR6« 172354 


698 




172356 


KIPAR7" 172356 


699 








700 






.EOUIV SP.KSP 


701 






.EQUIV SP.USP 


702 






.EOUIV BIT4,TBIT 


703 






.EQUIV BIT6,WBIT 


704 




001100 


KERSTK" STACK 


705 




000700 


USESTK- STACK-200 


706 








707 






{•ADDITIONAL DEFINITIONS 


708 






•• 


709 








710 








71 1 






.SBTTL TRAP CATCHER 


712 
713 




000000 


.=0 


714 






;*ALL UNUSED LOCATIONS FROM 4 - 776 CONTAIN A ".■l-2,HALT" 


715 






.••SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 


716 






{•LOCATION CONTAINS TO CATCH IMPROPERLY LOADED VECTORS 


717 




000174 


.«174 


718 


000174 


000000 


DISPREG: .WORD {'.SOFTWARE DISPLAY REGISTER 


719 


000176 


000000 


SWREG: .word ; {SOFTWARE SWITCH REGISTER 


720 






.SBTTL STARTING ADDRESS(ES) 


7?1 


000200 


000137 020000 


JMP »#START {{UUMP TO STARTING ADDRESS OF PROGRAM 


722 






.SBTTL ACT 11 HOOKS 


723 








724 








725 






{HOOKS REQUIRED BY ACT11 


726 




000204 


$SVPC». {SAVE PC 


727 




000046 


.«46 


728 


000046 


034760 


SENDAD {{1)SET L0C.46 TO ADDRESS OF SENDAO 


729 




000052 


.»52 


730 


000052 


000000 


.WORD {{2) SET L0C.52 TO ZERO 


731 




000204 


.=$SVPC {{ RESTORE PC 


732 






.SBTTL APT PARAMETER BLOCK 


733 








734 






••Kiiti«*««itii(<«4i«*«««#««««*****«*«««****«*«««****««*« •*•««**« «*••««•« 


735 






•SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 


735 






•;«*4ii«i«««#««i»«««**«*4iW*««^*««**«*i»*««««**W«*««*«* *«••«♦««•«••««•« 


737 




000204 


.$X«. { {SAVE CURRENT LOCATION 


738 




000024 


.>24 { {SET POWER FAIL TO POINT TO START OF PROGRAM 
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SEQ 0016 



739 
740 
741 
742 
743 
744 
745 
746 
747 
748 
749 
750 
751 
752 
753 



000024 000200 
000044 

000044 000204 
000204 



000204 

000204 000000 

000206 001226 

000210 000010 

000212 000020 

000214 000005 

000216 000052 



200 ;;FOR APT START UP 

.=44 JjPOINT TO APT INDIRECT ADDRESS PNTR. 
SAPTHDR ; {POINT TO APT HEADER BLOCK 
.«.$X RESET LOCATION COUNTER 

. ^t*** *****************'**************************'****** ********** 

{SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 
{INTERFACE SPEC. 



SAPTHD: 

SHIIBTS: 

SMBADR: 

STSTM: 

SPASTM: 

SUNITM: 



.WORD {{TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 

.WORD SMAIL {{ADDRESS OF APT MAILBOX (BITS 0-15) 

.WORD 10 {{RUN TIM OF LONGEST TEST 

.WORD 20 {{RUN TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 

.WORD 5 {{ADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH AODITIONAl. UNIT 

.WORD $ETEND-$MAlL/2 ; { LENGTH MAI LBOX-ETABLE(WORDS) 
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SEQ 0017 



754 
755 
756 
757 
758 
759 
760 
761 
762 
763 
764 
765 
766 
767 
768 
769 
770 
771 
772 
773 
774 
775 
776 
777 
778 
779 
780 
781 
782 
783 
784 
785 
786 
787 
788 
789 
790 
791 
792 
793 
794 
795 
796 
797 
798 
799 
800 
801 
802 
803 
804 
805 
806 
807 
SOB 
809 





001100 


001100 




001100 


000000 


001102 


000 


001 103 


000 


001 104 


000000 


001 106 


000000 


0011 10 


000. 30 


0011 12 


000000 


001 1 14 


000 


0011 15 


001 


0011 16 


000000 


001120 


000000 


001 122 


000000 


001 124 


000000 


001 126 


000000 


00 11 30 


000000 


001132 


000000 


001 134 


000 


001135 


000 


001 136 


000000 


001 140 


177570 


001 142 


177570 


001 144 


177560 


001146 


177562 


001 150 


177564 


001 152 


177566 


001 154 


000 


001 155 


002 


001156 


012 


001 157 


000 


001 160 


000000 


001162 


000000 


001 164 


000000 


001 166 


000000 


001 170 


000000 


001 172 


000000 


001 174 


000000 


001176 


000000 


001200 


000000 


001202 


000000 


001204 


000000 


001206 


000000 


001210 


oocooo 


001212 


000000 


001214 


000000 


001216 


177607 000377 


001222 


077 


001223 


015 



.SBTTL COMMON TAGS 

..*♦♦»♦«♦♦*♦♦**♦♦♦«•♦♦♦•♦♦♦♦•♦♦♦♦**♦*•♦**♦***♦*♦♦ *♦*♦••♦*****♦♦♦* 

{^THIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 
{*USED IN THE PROGRAM. 



.=1100 

.WORD 
.BYTE 
.BYTE 
.WORD 
.WORD 
.WORD 
.WORD 
.BYTE 
.BYTE 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.BYTE 
.BYTE 
.WORD 
.WORD 



SCMTAG: 

STSTNM: 

SERFLG: 

SICNT: 

SLPADR: 

SLPERR: 

SERTTL: 

SITEMB: 

SERMAX: 

SERRPC: 

SGDADR: 

SBOADR: 

SGDOAT: 

SBDDAT: 



SAUTOB: 
SINTAG: 

SWR: 

DISPLAY 

$Tl j: 

$TKB: 

$TPS: 

$TPB: 

Snull: 

SFILLS: 

SFILLC: 

STPFLG: 

SREGAD: 



SREGO: .word 

SREGi: .WORD 

$REG2: .WORD 

$REG3: .word 

$REG4: .WORD 

SREGf: .WORD 

STMPO: .WORD 

STMPi: .WORD 

$TMP2: .WORD 

$TMP3: .word 

$TMP4: .word 

$TMP5: .WORD 

STIMES: 
$ESCAPE:0 

$BELL: .ASCIZ <207><377><377> 











1 











DSWR 
.WORD DDISP 
177560 
177562 
177564 
177566 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.WORD 





2 

12 







SQUES: 
SCRLF: 



.ASCII 
.ASCII 



n/ 

<15> 



{START OF COMMON TAGS 

CONTAINS THE TEST NUMBER 
CONTAINS ERROR FLAG 
CONTAINS SUBTEST ITERATION COUNT 
CONTAINS SCOPE LOOP ADDRESS 
CONTAINS SCOPE RETURN FOR ERRORS 
CONTAINS TOTAL ERRORS DETECTED 
CONTAINS ITEM CONTROL BYTE 
CONTAINS MAX. ERRORS PER TEST 
CONTAINS PC OF LAST ERROR INSTRUCTION 
CONTAINS ADDRESS OF 'GOOD' DATA 
CONTAINS ADDRESS OF 'BAD' DATA 
CONTAINS 'GOOD' DATA 
CONTAINS 'BAD' DATA 
RESERVED— NOT TO BE USED 

AUTOMATIC MODE INDICATOR 
INTERP'.'PT MODE INDICATOR 

ADDRESS OF SWITCH REGISTER 
ADDRESS OF DISPLAY REGISTER 
TTY KBD STATUS 
TTY KBD BUFFER 

TTY PRINTER STATUS REG. ADDRESS 

TTY PRINTER BUFFER REG. ADDRESS 

CONTAINS NULL CHARACTER FOR FILLS 

CONTAINS # OF FILLER CHARACTERS REQUIRED 

INSERT FILL CHARS. AFTER A "LINE FEED" 

"TERMINAL AVAILABLE" FLAG ( BIT<07>-0«YE5) 

CONTAINS THE ADDRESS FROM 

WHICH (SREGO) WAS OBTAINED 

CONTAINS (($REGAD)+0) 

CONTAINS ((SREGAD) +2) 

CONTAINS {($REGAD)+4) 

CONTAINS ( (SREGAD )-«-6) 

CONTAINS ( ($REGAD)+10) 

CONTAINS { (SREGAD )4-1 2) 

USER DEFINED 

USER DEFINED 

USER DEFINED 

USER DEFINED 

USER DEFINED 

USER DEFINED 

MAX. NUMBER OF ITERATIONS 

ESCAPE ON ERROR ADDRESS 
CODE FOR BELL 
QUESTION MARK 
CARRIAGE RETURN 
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COMMON 


tags 






BIO 


001 224 


OOUU 1 ^ 


$LF: 


.ASCIZ 


<12> 


; JLINE FEED 


01 1 










812 






.SBTTL 


APT MAILROX-ETABLE 


813 
814 






J 


it If *i^it,it^,t$^ii^i^*iti^,rt,i^itittntiit'***********'*********** ********** 


815 






.EVEN 








816 


00 1 226 




$mail: 








APT MAILBOX 


817 


00 1 226 


ooooco 


SMSGTY: 


.WORD 


AMSGTY 




MESSAGE TYPE CODE 


HIS 


001 230 


AA AA AA 


Sfatal: 


.WORD 


AFATAL 




FATAL ERROR NUMBER 


819 


001 232 


000000 


STEbTN: 


.WORD 


ATESTN 




TEST NUMBER 


820 


001 234 


000000 


$PASS: 


.WORD 


APASS 




PASS COUNT 


821 


00 1 236 


A A A A A A 

000000 


SDEVCT: 


.WORD 


ADEVCT 




DEVICE COUNT 


822 


00 1 240 


000000 


$UNIT: 


.WORD 


AUNIT 




I/O UNIT NUMBER 


823 


001 242 


000000 


SMSGAD: 


.WORD 


AMSGAD 




MESSAGE ADDRESS 


824 


00 1 244 


000000 


$MSGLG: 


.WORD 


AMSGLG 




MESSAGE LENGTH 


825 


00 1 246 




SETABLE 








APT ENVIRONMENT TABLE 


826 


001 246 


000 


$ENV: 


.BYTE 


AENV 




ENVIRONMENT BYTE 


827 


001 247 


000 


$ENVM: 


.BYTE 


AENVM 




ENVIRONMENT MODE BITS 


828 


00 1 250 


AA AAA A 

000000 


$swreg: 


.WORD 


ASWREG 




APT SWITCH REGISTER 


829 


001 252 


000000 


$uswr: 


.WORD 


AUSWR 




USER SWITCHES 


830 


001 254 


000000 


SCPUOP: 


.WORD 


ACPUOP 




CPU TYPE, OPTIONS 


831 






• * 




BITS 15-11=CPU TYPE 


832 






• ♦ 






11/04»01 .11/05=02, 11/a0a03 


833 












1 1/70=06, PD0=07,0«10 


834 






• « 




B 


T 10«REAL TIME CLOCK 


835 






I * 




I 


JIT 9aFL0ATING POINT PROCESSOR 


836 






; * 




BIT 8=MEM0RY MANAGEMENT 


837 


00 1 256 


000 


$MAMS1 : 


.BYTE 


AMAMS1 


•.HIGH ADDRESS. M.S. BYTE 


833 


OD 1 257 


000 


SMTYPI : 


.BYTE 


AMTYP1 


;MEM. TYPE,BLK#1 


839 






; * 




MEM. TYPE BYTE — (HIGH BYTE) 


940 






; * 






900 NSEC CORE=001 


941 






; * 






300 NSEC BIPOLAR»002 


842 






• * 






500 NSEC M0S=003 


843 


00 1 260 


A A A A A A 

000000 


$MADR1 : 


.WORD 


AMADR1 


iHIGH ADDRESS. BLK#1 


844 






i * 






MEM. LAST ADDR.=3 BYTES, THIS WORD 


845 


001 262 




$MAMS2: 


.BYTE 


AMAMS2 




HIGH ADDRESS, M.S. BYTE 


846 


00 1 263 


000 


$MTyP2: 


.BYTE 


AMTYP2 




MEM. TYPE, BLK/V2 


847 


001 264 


000000 


$MADR2: 


.WORD 


AMADR2 




MEM. LAST ADDRESS, BLK#2 


848 


001 266 




$MAMS3: 


. BYTE 


AMAMS3 




HIGH ADDRESS, M.S. BYTE 


849 


001 267 


000 


$MTYP3: 


.BYTE 


AMTYP3 




MEM. TYPE, BLK/y3 


850 




AA AAA A 

00 0000 


$MADR3: 


.WORD 


AMADR3 




MEM. LAST ADDRESS, BLK#3 


851 


I? 




$MAMS4: 


.BYTE 


AMAMS4 




HIGH ADDRESS, M.S. BYTE 


852 


001 273 


000 


$MTYP4: 


.BYTE 


AMTYP4 




MEM. TYPE, BLK*4 


853 


001 274 


000000 


$MADR4: 


.WORD 


AMADR4 




MEM. LAST ADDRESS, BLK*4 


854 


001276 


000000 


svecti : 


.WORD 


AVECT1 




INTERRUPT VECT0R/»1 ,BUS PRIORITY* 


855 


001300 


000000 


$VECT2 ! 


.WORD 


AVECT2 




INTERRUPT VECT0R(i'2BUS PRI0RITY*2 


856 


001302 


000000 


$BASE: 


.WORD 


ABASE 




BASE ADDRESS OF EQUIPMENT UNDER 


857 


001304 


000000 


SDEVM: 


.WORD 


ADEVM 




DEVICE MAP 


858 


001306 


000000 


$CDW1 : 


.WORD 


ACDW1 




CONTROLLER DESCRIPTION W0RD#1 


859 


001310 


000000 


$CDW2 : 


.WORD 


ACDW2 




CONTROLLER DESCRIPTION W0R0#2 


860 


001312 


000000 


SDDWO: 


.WORD 


ADDWO 




DEVICE DESCRIPTOR WORD^O 


861 


001314 


000000 


$D0W1 : 


.WORD 


ADDW1 




DEVICE DESCRIPTOR W0RD#1 


862 


001316 


000900 


SDDW2: 


.WORD 


ADDW2 




DEVICE DESCRIPTOR W0RD#2 


863 


001320 


000000 


SD0W3: 


.WORD 


ADDW3 




DEVICE DESCRIPTOR W0RD#3 


B54 


001322 


000000 


$DDW4: 


.WORD 


ADDW4 




DEVICE DESCRIPTOR W0RD#4 


865 


001324 


000000 


SDDWS: 


.WORD 


AD0W5 




DEVICE DESCRIPTOR W0RD#5 



•TYPE" ABOVE 
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APT MAILBOX-ETABLE 


866 


001326 


000000 


$DDW6: 


.WORD 


ADDW6 


867 


001330 


000000 


$DDW7: 


.WORD 


ADDW7 


868 


001332 


000000 


$DDW8: 


.WORD 


ADDW8 


869 


001334 


000000 


$DDW9: 


.WORD 


ADDW9 


870 


001336 


000000 


$DDW10: 


.WORD 


ADDW10 


871 


001340 


000000 


$DDW1 1 : 


.WORD 


ADDW1 1 


872 


001342 


000000 


$DDW12: 


.WORD 


ADDW12 


873 


001344 


000000 


$DDW13: 


.WORD 


ADDW13 


874 


001346 


000000 


$DDW14: 


.WORD 


ADDW14 


875 


001350 


000000 


SDDWIS: 


.WORD 


ADDW15 


876 












877 












878 


001352 




SETEND: 






879 
880 












881 


001352 


000000 


TESTNO: 


.WORD 





882 


001354 


000000 


WASR6: 


.WORD 





883 


001356 


000000 


TRAPPC: 


.WORD 





884 


001360 


000000 


TRAPPS: 


.WORD 





885 


001362 


000000 


CORSRO! 


.WORD 





886 


001364 


000000 


C0RSR2: 


.WORD 





887 


001366 


000000 


WASSRO: 


.WORD 





888 


001370 


000000 


WASSR2: 


.WORD 





889 


001372 


000000 


TBITPS: 


.WORD 





890 


001374 


000000 


ANDADR: 


.WORD 





891 


001376 


000000 


ORADR: 


.WORD 





892 


001400 


000000 


TONUM: 


.WORD 





893 


001402 


000000 


VIRT1 : 


.WORD 





894 


001404 


000000 


VIRT2: 


.WORD 





895 


001406 


000000 


PBALO! 


.WORD 





896 


001410 


000000 


PBAHi: 


.WORD 






SEQ 0019 



; DEVICE 
; DEVICE 
; DEVICE 
i DEVICE 
; DEVICE 
[DEVICE 
[DEVICE 
[DEVICE 
[DEVICE 
[DEVICE 



DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 



W0RD#6 

W0RD*7 

WORD^B 

W0RD#9 

WORD#10 

WORD/i'11 

WORD* 12 

WORD* 13 

WORD* 14 

W0RD*15 



;HOLDS TEST NUMBER FOR TYPEOUTS 
;USED TO STORE THE STACK POINTER AFTER A TRAP 
[USED TO STORE THE PC OF A TRAP OH ABORT 
[USED TO STORE THE PS OF A TRAP OH ABORT 
J+USED TO STORE THE COPBPCT SRO 

;+USED TO STORE THE CORRECT SR2 

[USED TO STORE CONTENTS OF SRO 

[USED TO STORE CONTENTS OR SR2 

[SAVES THE PSW THAT MAY HAVE ITS T-BIT ON 

[HOLDS RESULT OF ADDRESSES BEING AND-ED 

[HOLDS RESULT OF ADDRESSES BEING OR-ED 

[HOLDS NUMBER OF TIME-OUTS 

;HOLDS VIRTUAL ADDRESS TO BE CONVERTED 

;HOLDS BITS <15:00> OF PHYSICAL ADDRESS 
{HOLDS BITS <17:16> OF PHYSICAL ADDRESS 
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SEO 0020 



897 
898 
899 
900 
901 
902 
903 
904 
905 
906 
907 
908 
909 
910 
911 
912 
913 
314 
915 
916 

ni7 

918 
019 
920 
921 
922 
923 
924 
925 
926 
927 
928 
929 
930 
931 
932 
933 
934 
935 
936 
937 
936 
939 
940 
941 
942 
943 
944 
945 
946 
947 
948 
949 
950 
951 
952 



001412 
001414 
001416 
001420 



001422 
00142^ 
001426 
001430 



001432 
001434 
001436 
001440 



001442 
001444 
001446 
001450 



001452 
001454 
001456 
001460 



001462 
001464 
001466 
001470 



001472 
001474 
001476 



041616 
045620 
051220 
Ob2l 12 



041656 
045670 
051234 
0521 17 



041725 
045760 
051254 
052126 



041764 
045760 
051254 
052126 



042017 
045760 
051254 
052126 



042072 
045760 
051254 
052126 



042137 
046020 
051266 



.SBTTL ERROR POINTER TABLE 

;*THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR. 

;*THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN 

;*LOCATION SITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE TABLE IS PERTINENT. 

!*N0TE1: IF SITEMB 13 THE ONLY PERTINENT DATA IS (SERRPC). 

;*N0TE3: EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWSl 



* 


EM 


; {POINTS 


TO 


THE 


ERROR MESSAGE 


♦ 


DH 


;;POINTS 


TO 


THE 


DATA HEADER 


* 


DT 


J {POINTS 


TO 


THE 


DATA 


* 


DF 


{{POINTS 


TO 


THE 


DATA FORMAT 



SERRTB: 
{•ITEM 1 



EMI 
DH1 
DTI 

on 



{•ITEM 2 



EM2 
DH2 
DT2 
DF2 



EM3 
DH3 
DT3 
DF3 



EM4 
DH3 
DT3 
DF3 



{♦ITEM 5 



EMS 
DH3 
DT3 
DF3 



{•ITEM 6 



EM6 
DH3 
DT3 
DF3 



EM? 
DH7 
DT7 



{UNEXPECTED CPU TRAP TO LOC. 004 

{OLD PC OLD PSW R6 WAS TESTNO ERRORPC 

jTRAPPC, TRAPPS, WASR6, TESTNO, $ERPPC. 

{0,0,0,0,0 



{UNEXPECTED MEM. MGMT. TRAP TO LOC. 250 

{OLD PC OLD PSW R6 WAS SRO SR2 TESTNO ERRORPC 

{TRAPPC. TRAPPS. WASR6. WASSRO. WASSR2« TESTNO* SERRPC, 
{0,0,0,0,0.0,0 



{PRIORITY BITS SET WRONG IN PSW 
{WROTE READ TESTNO ERRORPC 
{SREGO.SREGI .TESTNO, SERRPC, 
;0, 0,0.0 



{MODE BITS SET WRONG IN PSW 
{WROTE READ TESTNO ERRORPC 
{SREGO.SREGI .TESTNO, SERRPC. 
;0, 0,0.0 



{DUAL ADDRESSING BETWEEN HI&LO BYTES OF PSW 
{WROTE READ TESTNO ERRORPC 
{SREGO.SREGI .TESTNO, SERRPC. 
{0,0,0,0 



{KERNEL R6 CHANGED BY WRITING USER R6 
{WROTE READ TESTNO ERRORPC 
;$REG0.$REG1 .TESTNO, SERRPC. 
{0.0,0.0 



{A MEMORY MGMT. REG. TIMED OUT 
{ADDRESS TESTNO ERRORPC 
{ SREGO , TESTNO . SERRPC . 
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SEQ 0031 



953 
954 
955 
956 
957 
958 
959 
960 
961 
962 
963 
964 
965 
966 
967 
968 
969 
970 
971 
972 
973 
974 
975 
976 
977 
978 
979 
980 
981 
982 
983 
984 
985 
986 
987 
988 
989 
990 
991 
992 
993 
994 
995 
996 
997 
998 
999 
1000 
1001 
1002 
1003 
1004 
1005 
1006 
1007 
1008 



001500 052132 



001502 
001504 



001506 
001510 



001512 
001514 



001516 
001520 



001522 
001524 



001526 
001530 



001532 
001534 
001536 
001540 



001542 
001544 
001546 
001550 



001552 
001554 



001556 
001560 



001562 
001564 



001566 
001570 



001572 
001574 



001576 
001600 



042175 
046050 



051276 
052135 



042241 
046150 



051312 
052142 



042301 
046270 



051326 
052147 



042350 
046430 
051344 
052155 



042405 
046430 
051344 
052155 



042440 
046270 



051326 
052147 



042514 
046460 



051354 
052160 



042556 
046560 



051372 
052166 



{♦ITEM 10 

EMIO 
OHIO 

DT10 
DF10 

{ • 1 1 EM 11 

EMU 
DH11 

DT11 
DF11 

{♦ITEM 12 

EMI 2 
DH12 

DT12 
DF12 

{•ITEM 13 

EM13 
DH13 
DTI 3 
DF13 

{•ITEM 14 

EM14 
DH13 
DTI 3 
DF13 

{•ITEM 15 

EMI 5 
DH12 

DT12 
DF12 

{•ITEM 16 

EMI 6 
DH16 

DT16 
DF16 

{•ITEM 17 

EMI 7 
DH17 

DT17 
DF17 



{SUMMARY OF MEM. MGMT. REG. TIMEOUTS 

{REGISTER-ADDRS NUM. OF 

{AND-ED OR-ED TIMOUTS TESTNO ERRORPC 

{ANDADR.ORADR.TONUM. TESTNO. SERRPC, 

{0.0,1,0,0 



{MEM. MGMT. REG. WOULD NOT CLEAR 

{REGISTR READ READ-( BINARY ) 

{ADDRESS (OCTAL) 5432109876543210 TESTNO 

{SREGO, SREGI , SREGl , TESTNO . SERRPC ,0 

{0,0.2.0.0 



ERRORPC 



{MEM. MGMT. REG. BITS NOT SET CORRECTLY 
{REGISTR WROTE READ READ 

{ADDRESS (OCTAL) (OCTAL) (BINARY) TESTNO ERRORPC 
{ SREGO, SREGI ,$REG2,$REG2, TESTNO, SERRPC, 
{0.0,0.2.0,0 



{SRO EFFECTED BY WRITE TO PSW 
{READ TESTNO ERRORPC 
{SREGO. TESTNO, SERRPC. 
; , . 



{SRI DID NOT READ ALL ZEROS 
{READ TESTNO ERRORPC 
{SREGO. TESTNO, SERRPC. 
',0,0,0 



{DUAL ADDRESSING BETWEEN BYTES OF PAR OR PDR 
{REGISTER WROTE READ READ 

{ADDRESS (OCTAL) (OCTAL) (BINARY) TESTNO ERRORPC 
{ SREGO, SREGI ,$REG2,SREG2. TESTNO, SERRPC, 
{0,0,0,2,0,0 



{DUAL ADDRESSING BETWEEN PAR-PDR ' S 
;PAR-PDR PAR-PDR 

{CLEARED EFFECTD EXPECTD RECEIVD TfSTNO ERRORPC 
{SREGO, SREGI ,$REG5.SREG2. TESTNO. SERRPC, 
{0,0,0,0,0,0 



{PHYS. ADDR. FORMED READ WRONG IN MAINT. I 
{PHYSICAL VIRTUAL 

{ADDRESS ADDRESS KIPAR4 TESTNO ERRORPC 
{PBALO.VIRTI ,SREG4, TESTNO, SERRPC. 
{3,0,0,0,0 
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SEQ 002a 



1009 

1010 

101 1 

1012 

1013 

1014 

1015 

1016 

1017 

1018 

1019 

1020 

1021 

1022 

1023 

1024 

1025 

1026 

1027 

1028 

1029 

1030 

1031 

1032 

1033 

1034 

1035 

1036 

1037 

1038 

1039 

1040 

1041 

1042 

1043 

1044 

1045 

1046 

1047 

1048 

1049 

1050 

105^ 

1052 

1053 

1054 

1055 

1056 

1057 

1058 

1059 

1060 

1061 

1062 

1063 

1064 



001602 
001604 



001606 
001610 



001612 
001614 



001616 
001620 



001622 
001624 



001626 
001630 



042626 
046S50 



051406 
052173 



042700 
046776 



051430 
052203 



042735 
047056 



051442 
052207 



001632 042774 

001634 047155 

001636 051456 

001640 052214 



001642 043040 

001644 047205 

001646 051466 

001650 052217 



001652 043100 

001654 047205 

001656 051466 

001660 052217 



001662 
001664 
001666 
001670 



001672 
001674 
001676 
001700 



001702 
001704 
001706 
001710 



043145 
047245 
051500 
052217 



043215 
047245 
051500 
052217 



043264 
047305 
051512 
052223 



;*1TEM 20 

EM20 
DM20 

DT20 
DF20 

;*ITEM 21 

EM21 
DH21 

DT21 
0F21 

;«ITEM 22 

EM22 
DH22 

DT22 
DF22 

{•ITEM 23 

EM23 
DH23 
DT23 
DF23 

;»ITEM 24 

EM24 
DH24 
DT24 
DF24 

;«XTEM 25 

EM25 
DH24 
DT24 
DF24 

;«tTEM 26 

EM26 
DH26 
DT26 
DF24 

{•ITEM 27 

EM27 
DH26 
DT26 
DF24 

{•ITEM 30 

EM30 
DH30 
DT30 
DF30 



;PHYS. ADDR. FORMED READ WRONG IN RELOCATE MODE 
;PHYSICL PAR 4 PAR 5 

; ADDRESS VBA VBA PAR 4 PAR 5 PSW TESTNO 

JPBALO.VIRTI ,VIRT2.$REG4,$REG5,$TMP0, TESTNO, $ERRPC,0 
:3, 0,0, 0,0. 0,0,0 



;W-BIT DID NOT GET SET IN PDR 
;PDR VIRTUAL 

; TESTED ADDRESS TESTNO ERRDRPC 
I $REG5 , $REG3 . TESTNO , $ERRPC . 
;0, 0,0,0 



;W-BIT SET IN MORE THAN ONE PDR 
;PDR IN PDR VIRTUAL 

{ERROR TESTED ADDRESS TESTNO ERRORPC 
;$REG0,$REG5,$REG3, TESTNO, SERRPC.O 
;0. 0,0. 0.0 



;W-BIT NOT CLEARED BY WRITING TO PDR 
;PDR TESTNO ERRORPC 

; $REG5 .TESTNO , $ERRPC , 

;o,o,o 



{WRITING SRO SET W-BIT IN KIPDR7 
;PDR WAS EXPECTD TESTNO ERRORPC 
{$REG2.$REG1 .TESTNO, SERRPC.O 
{0.0,0.0 



{W-BIT GOT SET DURING ODD ADDR. ABORT 
{PDR WAS EXPECTD TESTNO ERRORPC 
{$REG2,$REG1 , TESTNO . SERRPC . 
;0, 0,0.0 



{MEMORY MGMT. ACCESS ABORT DID NOT OCCUR 
{PDR 4 PSW TESTNO ERRORPC 

{ $REG2 , STMPO .TESTNO , SERRPC . 
{0.0,0.0 



{ACCESS ERROR DID NOT ABORT INSTRUCTION 
{PDR 4 PSW TESTNO ERRORPC 

{$REG2. STMPO, TESTNO, SERRPC.O 
{0.0,0.0 



{SRO DID NOT REPORT ACCESS ERROR CORRECTLY 
{SRO WAS EXPECTD PDR 4 PSW TESTNO ERRORPC 

{ WASSRO . SREG3 , SREG2 . STMPO , TESTNO . SERRPC . 
{0,0.0,0,0.0 
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1065 










1066 






{•ITEM 


31 


1067 


001712 


043336 




EM31 


1068 


001714 


047365 




DH31 


1069 


001716 


051530 




DT31 


1070 


001720 


052223 




DF30 


1071 










1072 






{•ITEM 


32 


1073 


001722 


043403 




EM32 


1074 


001724 


047445 




DH32 


1075 


001726 


051546 




DT32 


1076 


001730 


052223 




DF30 


1077 










1078 






{♦ITEM 


33 


1079 


001732 


043';54 




EM33 


1080 


001734 


047525 




DH33 


1081 


001736 


051564 




DT33 


1082 


001740 


052217 




DF24 


1083 










1084 






{•ITEM 


34 


1085 


001742 


043547 




EM34 


1086 


001744 


047565 




DH34 


1087 


001746 


051576 




DT34 


1088 


001750 


052223 




DF30 


1089 






{•ITEM 


35 


1090 


001752 


043336 




EM31 


1091 


001754 


047645 




DH35 


1092 


001756 


051614 




DT35 


1093 


001760 


052223 




DF30 


1094 










1095 






{•^I'EM 


36 


1096 


001762 


043336 




EM31 


1097 


001764 


047725 




DH36 


1098 


001766 


051632 




DT36 


1099 


001770 


052217 




DF24 


1 100 










1 101 






{•ITEM 


37 


1 102 


001772 


043625 




EM37 


1 103 


001774 


047765 




DH37 


1 104 










1 105 


001776 


051644 




DT37 


1 106 


002000 


052223 




DF30 


1 107 










1 108 






{•ITEM 


40 


1 109 


002002 


043672 




EM40 


1 110 


002004 


050102 




DH40 


1111 


002006 


051662 




DT40 


1 112 


002010 


052217 




DF24 


1 113 










1 114 






{•ITEM 


41 


1115 


002012 


043741 




EM41 


1 116 


002014 


047725 




DH36 


1117 


002016 


051632 




DT36 


1 118 


002020 


052217 




DF24 


1 119 










1 120 






{•ITEM 


42 



PAGE 24 

SEQ 0023 



;SR2 DID NOT LOCKUP CORRECT VIRTUAL ADDR. 
{SR2 WAS EXPECTD PDR 4 PSW TESTNO ERRORPC 

{ WASSR2 , $REG4 , SREG2 , STMPO .TESTNO , SERRPC , 
{0,0,0.0,0.0 



{PAGE LGTH. ABORT OCCURRED WHEN IT SHOULDN'T HAVE 
{V.B.A. KIPDR4 SRO WAS SR2 WAS TESTNO ERRORPC 
{$REG0,$REG4, WASSRO. WASSR2. TESTNO, SERRPC, 
{0.0,0.0,0,0 



{PAGE LGTH. ABORT DID NOT OCCUR WHEN IT SHOULD HAVE 
{V.B.A. KIPDR4 TESTNO ERRORPC 
{$REG0.$REG4, TESTNO, SERRPC.O 
{0,0,0.0 



;SRO DID NOT REPORT PAGE LGTH. ABORT CORRECTLY 
{V.B.A. KIPDR4 SRO WAS EXPECTD TESTNO ERRORPC 
{ SREGO . $REG4 , WASSRO , SREG2 .TESTNO , SERRPC , 
{0,0,0,0,0,0 

;SR2 DID NOT LOCKUP CORRECT VIRUAL ADDR. 
{V.B.A. KIPDR4 SR2 WAS EXPECTD TESTNO ERRORPC 
{ SREGO , $REG4 , WASSR2 . SREG3 . TESTNO , SERRPC , 
{0,0,0,0,0,0 



{SR2 DID NOT LOCKUP CORRECT VIRUAL ADDR. 
{5R2 WAS EXPECTD TESTNO ERRORPC 
{WASSR2,SREG1 , TESTNO, SERRPC , 
{0,0,0,0 



{SRO OR SR2 CHANGED BY A SECOND ABORT 
{FIRST ABORT SECOND ABORT 

;SRO WAS SR2 WAS SRO WAS SR2 WAS TESTNO ERRORPC 
{ STMPO , $TMP2 , WASSRO , WASSR2 , TESTNO . SERRPC, 
{0,0,0,0,0,0 



;SRO OR SR2 WAS NOT "RESET" BY A RESET 
;SRO WAS SR2 WAS TESTNO ERRORPC 
; WASSRO, WASSR2, TESTNO, SERRPC, 
{0,0,0,0 



{SR2 NOT TRACKING CORRECTLY 
{SR2 WAS EXPECTD TESTNO ERROPC 
{WASSR2,$REG1 .TESTNO, SERRPC, 
{0,0.0,0 
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09:33 PAGE 25 



SEQ 0034 



1121 
11 22 
1 123 
1 124 
1 125 
1 126 
1 127 
1 128 
1 129 
1 130 
1 131 
1 132 
1 133 
1 134 
1 135 
1 136 
1 137 
1 138 
1 139 
1 140 
1 141 
1 142 
1 143 
1 144 
1 145 
1 146 
1 147 
1 148 
11 49 
1 150 
1 151 
1 152 
1 153 
1 154 
1 155 
1 156 
1 157 
1 158 
1 159 
1 160 
1 161 
1 162 
1 163 
1 164 
1 165 
1 166 
1 167 
1 168 
1 169 
1 170 
1 171 

I 172 

II 73 
1174 
1175 
1176 



002022 
002024 
002026 
002030 



002032 
002034 
002036 
002040 



002042 
002044 



002046 
002050 



002052 
002054 



002056 
002060 



002062 
002064 



002066 
002070 



002072 
002074 



002076 
002100 



00'2102 
002104 
002106 
0021 10 



0021 12 
0021 14 
0021 16 
002120 



043774 
050142 
051674 
052217 



044033 
047155 
051456 
052214 



044100 
050202 



051706 
052223 



044146 
050314 



051724 
052223 



044223 
05051 1 



051742 
052231 



044266 
05051 1 



051742 
052231 



044331 
050566 
051754 
052235 



044367 
050606 
051762 
052?37 



002122 044445 



EM42 
DH42 
DT42 
DF24 

;*ITEM 43 

EM43 
0H23 
DT23 
DF23 

;»ITEM 44 

EM44 
DH44 

DT44 
DF30 

{*ITEM 45 

EM45 
DH45 



DT45 
DF30 

;*ITEM 46 

EM46 
DH46 

DT46 
DF46 

;*ITEM 47 

EM47 
DH46 

DT46 
DF46 

;*ITEM 50 

EM50 
DH50 
DT50 
DF50 

{♦ITEM 51 

EM51 
DH51 
DT51 
DF51 

;*ZTEM 52 

EM52 



;DID NOT TRAP THRU KERNEL SPACE 
;PSW WAS R6 WAS TESTNO ERRORPC 
;$REG1 ,$REG2,TESTN0,$ERRPC,0 
;0. 0,0,0 



;KT ERROR SERVICED ON ODD ADDR. 
;PDR TESTNO ERRORPC 

; $REG5 , TESTNO , $ERRPC , 
;0,0,0 



;SRO OR SR2 CHANGED BY ODD ADDR. ERROR 
; EXPECTED RECEIVED 

;SRO SR2 SRO WAS SR2 WAS TESTNO ERRORPC 

;$REG0.$REG1 , WASSRO ,WASSR2 , TESTNO, SERRPC.O 
;0, 0,0, 0,0,0 

; ERROR DURING "DOUBLE ERROR" (KT & ODD ADDR.) 
;EXPECTED: 

;PSW PC SRO SR2 

; 170017 (3$-l-4) 020147 (3$) 
;RECEIVED 

;PSW PC SRO SR2 TESTNO ERRORPC 

; $REG1 , $REG3 , WASSRO ,WASSR2 , TESTNO, SERRPC.O 
;0, 0.0. 0,0.0 



;MFPI INSTRUCTION PUSHED WRONG DATA 
;DATA DATA 

;EXPECTD RECEIVD TESTNO ERRORPC 
;$REG0.$REG1 .TESTNO, SERRPCO 
;0. 0,0.0 



•,MTPI INSTRUCTION LOADED WRONG DATA 
•.DATA DATA 

;EXPECTD RECEIVD TESTNO ERRORPC 
;$REG0.$REG1 .TESTNO, SERRPCO 
jO, 0,0,0 



; STACK NOT PUSHED BY MFPI-MTPI 
; TESTNO ERRORPC 
•.TESTNO, SERRPCO 
;0,0 



{KERNEL PAGE ACCESSED INSTEAD OF USER: MFPI-MTPI 
;SR0 WAS SR2 WAS TESTNO ERRORPC 
; WASSRO . WASSR2 , TESTNO , SERRPC , 
;0, 0.0.0 



I WRONG PDR'S REFERENCED WHILE IN RELOCATE MODE 
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SEO 0025 



1 177 


002124 


050546 




DH52 


1 178 










1 179 


002126 


051774 




DT52 


1 180 


002130 


052243 




DF52 


1181 






;*ITEM 


53 


1 182 


002132 


044523 




EMS 3 


1 183 


002134 


050511 




DH46 


1 184 








DT46 


1 185 


002136 


051742 




1 186 


002140 


052231 




DF46 


1 187 










1 188 






;«ITEM 


54 


1 169 


002142 


044566 




EM54 


1 190 


002144 


050566 




DH50 


1191 


002146 


051754 




DT50 


1 192 


002150 


052235 




DF50 


1 193 










1 194 






{♦ITEM 


55 


1 195 


002152 


044624 




EM55 


1 lye 


002154 


046150 




DH1 1 


1 197 










1 198 


002156 


051312 




DT11 


1 199 


002160 


052142 




DF11 


1200 










1201 






{♦ITEM 


56 


1202 


002162 


044662 




EM56 


1203 


002164 


050566 




DH50 


1204 


002166 


051754 




DT50 


1205 


002170 


052235 




DF50 


1206 










1207 






{♦ITEM 


57 


1208 


002172 


044716 




EM57 


1209 


002174 


050764 




DH57 


1210 


002176 


052U16 




DT57 


121 1 


002200 


052253 




DF57 


1212 










1213 






{♦ITEM 


60 


1214 


002202 


044773 




EM60 


1215 


002204 


051024 




DH60 


1216 


002206 


052030 




DT60 


1217 


002210 


052257 




DF60 


1210 










1219 






{♦ITEM 


61 


1220 


002212 


045036 




EM61 


1221 


002214 


050566 




DH50 


1222 


002216 


051754 




DT50 


1223 


002220 


052235 




DF50 


1224 










1225 






{♦ITEM 


62 


1226 


002222 


0451 14 




EM62 


1227 


002224 


045760 




DH3 


1228 


002226 


051254 




DT3 


1229 


002230 


052126 




DF3 


1230 










1231 






{♦ITEM 


63 


1232 


002232 


045165 




EM63 



JPHYSICL PAR 4 

{ADDRESS V.B.A. PAR 4 SRO WAS SR2 WAS PSW TESTNO 
; PBALO . V I RT 1 , $REG4 , WASSRO , WASSR2 , STMPO . TESTNO • SERRPC . 
;3, 0,0, 0,0, 0,0,0 

JMFPD INSTRUCTION PUSHED WRONG DATA 
{DATA DATA 

jEXPECTD RECEIVD TESTNO ERRORPC 
;$REG0,$REG1 .TESTNO, SERRPCO 
;0, 0,0,0 



'.STACK NOT PUSHED BY MFPD-MTPD 
{TESTNO ERRORPC 
{TESTNO, SERRPCO 
{0,0 



{PAR OR PDR WAS CHANGED BY A RESET 

{REGISTR READ READ-( BINARY ) 

{ADDRESS (OCTAL) 5432109876543210 TESTNO 

{SREGO.SREGI ,SREG1 .TESTNO, SERRPCO 

{0,0,2,0,0 



{ILLEGAL MODE 01 NOT ABORTED 
{TESTNO ERRORPC 
{TESTNO, SERRPC, 
{0,0 



{SRO DID NOT REPORT ILLEGAL MODE Ot CORRECTLY 
{SRO WAS EXPECTD TESTNO ERRORPC 
{WASSRO, SREGI , TESTNO, SERRPC.O 
{0,0,0.0 



{PSW CHANGED BY AN RTI IN USER MODE 
{PSW WAS EXPECTD TESTNO ERRORPC 
{SREGI ,$REG2, TESTNO, SERRPCO 
{0,0,0,0 



{MAINT MODE (SR0<8>) NOT DISABLED BY A RESET 
{TESTNO ERRORPC 
{ TESTNO, :,;ERRPC,0 
{0.0 



{DATA INCORRECT AFTER A MAINT. MODE WRITE 
{WROTE READ TESTNO ERRORPC 
{SREGO. SREGI .TESTNO, SERRPCO 
{0,0.0.0 



{SOURCE RELOCATED IN MAINT. MODE 
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09:33 



PAOr 27 



SEO 0026 



1233 

1234 

1235 

1236 

1237 

1238 

1239 

1240 

1241 

1242 

1243 

1244 

1245 

1246 

1247 

1248 

1249 

1250 

1251 

1252 

1253 

1254 

1255 

1256 

1257 

1258 

1259 

1260 

1261 

1262 

1263 

1264 

1265 

1266 

1267 

1268 

1269 

1270 

1271 

1272 

1273 

1274 

1275 

1276 

1277 

1278 

1279 

1280 



002234 045670 
002236 051234 
002240 052117 



002242 
002244 
002246 
002250 



002252 
002254 
002256 
002260 



043336 
047725 
052042 
052217 



045225 
051064 
0521 54 
052263 



002262 04526S 

002264 051064 

002266 052054 

002270 052263 



002272 045351 

002274 051064 

002276 052054 

002300 052263 



002302 
002304 
002306 
002310 



002312 
002314 
002316 
002320 



002322 
002324 
002326 
002330 



045441 
051064 
052054 
052263 



045506 
051122 
052066 
052263 



045562 
051 161 
052100 
052263 



DH2 
DT2 
DF2 

;*ITEM 64 

EM31 
DH36 
DT64 
DF24 

IflTEM 65 

EM64 
DH61 
DT65 
DF61 

;*ITEM 66 

EM65 
0H61 
DT65 
DF61 



EM66 
DH61 
DT65 
DF61 



;*ITEM 70 

EM67 
DH61 
DT65 
DF61 

;«ITEM 71 

EM70 
DH62 
DT66 
DF61 

}*ITEM 72 

EM71 
DH63 
DT67 
DF61 



;OLD PC OLD PSW R6 WAS SRO SRS TESTNO ERRORPC 

;TRAPPC,TRAPPS,WASR6,WASSR0.WASSR2.TESTN0.$ERRPC,0 
;0, 0,0, 0,0, 0,0 



;SR2 DIDNOT LOCKUP CORRECT VIRTUAL ADDR. 
;SR2 WAS EXPECTD TESTNO ERRORPC 
; WASSR2 , $REG4 , TESTNO , SERRPC . 
;0, 0,0,0 



;+NON RESIDENT ABORT DID NOT OCCUR 
;+SR0 SR2 TESTNO ERRORPC 

; +WASSRO , WASSR2 , TESTNO . SERRORPC 
; +0,0. 0,0 



;+ERROR FLAG FOR KR ABORT DID NOT SET 
;+SRO SR2 TESTNO ERRORPC 

} +WASSRO , WASSR2 , TESTNO .SERRPC 
5+0,0,0,0 



;+SR2 DID NOT FREEZE THE VIRTUAL ADRS OF ABORT 
;+SRO SR2 TESTNO ERRORPC 

; +WASSRO , WASSR2 , TESTNO . SERRPC 
1+0,0.0,0 



;+2ND NON RESIDENT ABORT DID NOT OCCUR 
J+SRO SR2 TESTNO ERRORPC 

; +WASSRO , WASSR2 , TESTNO , SERRPC 
5+0,0,0,0 



5+2ND NR ABORT CHANGED SR2 

5+SR2 EXPT SR2 RECD TESTNO ERRORPC 

5 +CORSR0 , WASSR2 , TESTNO. SERRPC 

5+0,0,0,0 



5+SRO WAS NOT CLEARED BY INIT 
5+SRO EXPT SRO RECD TESTNO ERRORPC 
5 +CORSR0 , WASSRO . TESTNO . ERRORPC 
;+0, 0,0,0 
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SEQ 0027 



1281 
1282 
1283 
1284 
1285 
1286 
1287 
1288 
1289 
1290 
1291 
1292 
1293 
1294 
1295 
1296 
1297 
1298 
1299 
1300 
1301 
1302 
1303 
1304 
1305 
1306 
1307 
1308 
1309 
1310 
131 1 
1312 
1313 
1314 
1315 
1316 
1317 
1318 
1319 
1320 
1321 
1322 
1323 
1324 
1325 
1326 
1327 
1328 
1329 
1330 
1331 
1332 
1333 
1334 
1335 
1336 



002410 
002414 
002420 
002424 
002432 
002440 
002446 
002450 
002456 
002462 



.SBTTL ***** TRAP HANDLING ROUTINES ***** 
.SBTTL CPU TRAP HANDLER ROUTINE 



***«**««********«**4(*«***« 



THIS SUBROUTINE WILL HANDLE ALL CPU TRAPS AND ABORTS THRU 
"ERRVEC" (LOC. 004). IF THIS SUBROUTINE IS ENTERED BY A 
SECOND TRAP BEFORE THE FIRST HAS BEEN SERVICED. A HALT IS 
EXECUTED. 



4>**«*************4i******iti**i»**4> 



002332 005227 

002334 177777 

002336 001401 

002340 000000 



002342 012637 001356 

002346 012637 001360 

002352 010637 001354 

002356 104001 

002360 012737 177777 

002366 013746 001360 

002372 013746 001356 

002376 000006 



01 2637 
01 2637 
01 0637 
01 3737 
01 3737 
042737 
104'^02 
012737 
013746 
013746 



TIMERR: INC 

timflg: .word 

BEQ 



MOV 

MOV 

MOV 

ERROR 

MOV 

MOV 

MOV 

RTT 



(PC) + 

-1 

1$ 



(KSP)+,TRAPPC 
(KSP)+,TRAPPS 
KSP.WASRB 
1 

*-1 .TIMFLG 

TRAPPS,-(KSP) 

TRAPPC,-(KSP) 



MAKE FLAG ZERO IF FIRST TIME THRU 

NEGATIVE ONE FOR "HAVE ENTERED" FLAG 

BRANCH IF FIRST TIME IN 

STOP! - I'VE ENTERED THIS ROUTINE 

A SECOND TIME BEFORE I FINISHED 

REPORTING THE FIRST ERROR. THE 

SECOND ENTRY ADDRESS SHOULD BE ON 

THE KERNEL STACK. 

SAVE PC+2 AT TIME OF ABORT 

SAVE PS AT TIME OF ABORT 

SAVE STACK POINTER VALUE 

UNEXPECTED TRAP OR ABORT TO LOC. 4 

MAKE FLAG NEGATIVE ONE FOR NEXT TIME 

PUT PC & PS OF TRAP ON STACK 

5 RETURN FROM INTERRUPT OR ABORT 



MEMORY MANAGEMENT TRAP HANDLER ROUTINE 

*****«*****«*************4i*****4,****4<i|i** 



***4>i4c*****4>iti** 



THIS SUBROUTINE WILL HANDLE ALL UNEXPECTED MEMORY MANAGEMENT 
TRAPS AND ABORTS THRU "MMVEC" (LOC. 250). IF THIS SUBROUTINE IS 
ENTERED BY A SECOND TRAP BEFORE THE FIRST HAS BEEN SERVICED, A 
HALT IS EXECUTED. 



002400 005227 

002402 177777 

002404 001401 

002406 000000 



*«********************4i«** 

MGMERR: INC (PC)+ 
MGMFLG: .WORD 



001356 
001360 
001354 
177572 
177576 
160000 

177777 
001360 
001356 



001366 
001370 
177572 



BEQ 
HALT 



MOV 

MOV 

MOV 

MOV 

MOV 

BIC 

ERROR 

MOV 

MOV 

MOV 



1$ 



(KSP)+,TRAPPC 

(KSP)+,TRAPPS 

KSP,WASR6 

SRO, WASSRO 

SR2,WASSR2 

(CI 60000, SRO 

2 

#-1 .MGMFLG 

TRAPPS,-{KSP) 

TRAPPC,-(KSP) 



t*>tt**«4:**********4<«*****«****4,*«4, 

MAKE FLAG ZERO IF FIRST TIME THRU 

NEGATIVE ONE FOR "HAVE ENTERED" FLAG 

BRANCH IF FIRST TIME IN 

STOP! - I'VE ENTERED THIS ROUTINE 

A SECOND TIME BEFORE I FINISHED 

REPORTING THE FIRST ERROR. THE 

SECOND ENTRY ADDRESS SHOULD BE ON 

THE KERNEL STACK. 

SAVE PC+2 AT TIME OF ABORT 

SAVE PS AT TIME OF ABORT 

SAVE STACK POINTER VALUE 

SAVE CONTENTS OF KT STATUS REG. 

SAVE CONTENTS OF KT STATUS REG. 2 

CLEAR ERROR BITS IN STATUS REG 

UNEXPECTED TRAP OR ABORT TO LOC. 250 

MAKE FLAG NEGATIVE ONE FOR NEXT TIME 

PUT PC & PS OF TRAP ON STACK 
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CFKTHB 


P11 


27-JUN-78 


09:27 












1339 












.SBTTL 




1340 












.SBTTL ***** STARTING 


POINT OF TEST ***** 


1341 












.SBTTL ***** STARTING 


ADDRESS OF 200 *♦*♦« 


1342 




020000 








.x20000 




1343 


















1344 


020000 








start: 








1345 










.SBTTL 


INITIALIZE THE COMMON TAGS 


1346 










;;CLEAR 


THE 


COMMON TAGS (SCMTAG) 


AREA 


1347 


020000 


012706 


001100 






MOV 


#$CMTAG,R6 


.•FIRST LOCATION TO BE CLEARED 


1348 


020004 


005026 








CLR 


(R6) + 


; CLEAR MEMORY LOCATION 


1349 


020006 


022706 


001140 






CMP 


#SWR,R6 ;;DONE? 




1350 


020012 


001374 








BNE 


.-6 


;LOOP BACK IF NO 


1351 


020014 


01 2706 


001100 






MOV 


(S'STACK.SP 


; SETUP THE STACK POINTER 


1352 










;jINITIALIZE 


A FEW VECTORS 




1353 


020020 


012737 


035040 


000020 




MOV 


#$SCOPE.©(CIOTVEC 


;;IOT VECTOR FOR SCOPE ROUTINE 


1354 


020026 


012737 


000340 


000022 




MOV 


#340,@#I0TVEC-l-2 


; LEVEL 7 


1355 


020034 


012737 


035320 


000030 




MOV 


#$ERROR,#*EMTVEC 


;;EMT VECTOR FOR ERROR ROUTINE 


1356 


020042 


012737 


000340 


000032 




MOV 


#340,@/yEMTVEC+2 


; LEVEL 7 


1357 


020050 


012737 


041302 


000034 




MOV 


#$TRAP,@#TRAPVEC 


;;TRAP VECTOR FOR TRAP CALLS 


1358 


020056 


012737 


000340 


000036 




MOV 


#340,^*TRAPVEC+2; LEVEL 7 


1359 


020064 


01 2737 


041370 


000024 




MOV 


<y$PWRDN,9#PWRVEC 


;; POWER FAILURE VECTOR 


1360 


020072 


012737 


000340 


000026 




MOV 


#340,@#PWRVEC+2 


; LEVEL 7 


1361 


020100 


013737 


034606 


034600 




MOV 


$ENDCT,$EOPCT 


; SETUP END-OF-PROGRAM COUNTER 


1362 


020106 


005037 


001212 






CLR 


.".TIMES 


.'INITIALIZE NUMBER OF ITERATIONS 


1363 


0201 12 


005037 


001214 






CLR 


SESCAPE 


; CLEAR THE ESCAPE ON ERROR ADDRESS 


1364 


0201 16 


112737 


000001 


001 IIS 




MOVB 


#1 ,$ERMAX 


{ALLOW fiNE ERROR PER TEST 


1365 










;:IN1TIALIZE 


THE "T-BIT" TRAP VECTOR. THEN LOAD LOCATION "$RTRN% IN 


1366 










;;THE " 


END-OF-PASS" ($EOP) ROUTINE. WITH A "RTI" OR "RTT". 


1367 


020124 


01 2737 


035024 


000014 




MOV 


(I'SRTRN.e/l'TBITVEC 


r.SET "T" BIT VECTOR TO SRTRN 


1368 


020132 


012737 


000340 


000016 




MOV 


#340,@#TBITVEC+a 


; ; LEVEL 7 


1369 


020140 


01 2737 


000002 


035024 




MOV 


#RTI,$RTRN ; 


;SET SRTRN TO A RTI 


1370 


020146 


012737 


020174 


000010 




MOV 


#65$,@#RESVEC ; 


.•TRY TO DO A RTT 


1371 


020154 


005046 








CLR 


-(SP) ; 


; DUMMY PS 


1372 


020156 


01 2746 


020164 






MOV 


#64$, -(SP) ; 


;AND PC 


1373 


020162 


000006 








RTT 




;TRY THE RTT 


1374 


020164 


012737 


000006 


035024 


64$: 


MOV 


#RTT,$RTRN 


JRTT IS LEGAL— SET $RTRN TO A RTT 


1375 


020172 


000402 








BR 


66$ 




1376 


020174 


062706 


000010 




65$: 


ADD 


#10, SP ; 


;RTT ILLEGAL— CLEAN OFF THE STACK 


1377 


020200 


012737 


000012 


000010 


66$: 


MOV 


#RESVEC+2.«>#RESVEC ; ;RESTORE TRAP CATCHER 


1378 


020206 


005037 


035032 






CLR 


$TBIT ; 


; CLEAR "T" BTT SWITCH 


1379 


020212 


012737 


020212 


001106 




MOV 


#.,$LPADR ; 


{INITIALIZE THE LOOP ADDRESS FOR SCOPE 


1380 


020220 


012737 


020220 


001110 




MOV 


#.,$LPERR ; 


{SETUP THE ERROR LOOP ADDRESS 


1381 










;;SIZE 


FOR A 


HARDWARE SWITCH REGISTER. IF NOT FOUND OR IT IS 


1382 










;; EQUAL 


TO A 


"-1", SETUP FOR A SOFTWARE SWITCH REGISTER. 


1383 


020226 


013746 


000004 






MOV 


«»#ERRVEC,-(SP) ; 


{SAVE ERROR VECTOR 


1384 


020232 


012737 


020266 


000004 




MOV 


#67$,@>#ERRVEC ; 


{SET UP ERROR VECTOR 


1385 


020240 


01 2737 


177570 


001 140 




MOV 


#DSWR,SWR ; 


{SETUP FOR A HARDWARE SWICH REGISTER 


1386 


020246 


012737 


177570 


001142 




MOV 


#DDISP, DISPLAY ; 


{AND A HARDWARE DISPLAY REGISTER 


1387 


020254 


022777 


177777 


160656 




CMP 


#-1 .9SWR ; 


{TRY TO REFERENCE HARDWARE SWR 


1388 


020262 


001012 








BNE 


69$ ; 


{BRANCH IF NO TIMEOUT TRAP OCCURRED 


1389 
















{AND THE HARDWARE SWR IS NOT m -t 


1390 


020264 


000403 








BR 


68$ ; 


{BRANCH IF NO TIMEOUT 


1391 


020266 


012716 


020274 




67$: 


MOV 


#68$, (SP) ; 


{SET UP FOR TRAP RETURN 


1392 


020272 


000002 








RTI 






1393 


020274 


012737 


000176 


001140 


68$: 


MOV 


#SWREG,SWR ; 


{POINT TO SOFTWARE SWR 


1394 


020302 


012737 


000174 


001142 




MOV 


#DISPREQ, DISPLAY 
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C FK THB . 


PI 1 27 


-JUN-78 


09:27 


1 395 


02031 


01 2637 


000004 


1 398 








1 397 


02031 4 


005037 


001234 


1 398 


020320 


1 32737 


000200 


1 399 


020326 


00 1 403 




1 400 


020330 


01 2737 


001250 


1 401 


020336 






1 402 








1 403 








1 404 


020336 


005227 


177777 


1 405 


020342 


001 051 




1 406 


020344 


022737 


034760 


1 407 


020352 


00 1 445 




1 40B 


020354 


104401 


020422 


1 409 








1410 


020360 


005737 


000042 


1411 


020364 


001012 




1412 


020366 


123727 


001246 


1413 


020374 


001406 




1414 


020376 


023727 


001 140 


1415 


020404 


00 1 005 




1416 


020405 


1 04407 




1417 


0204 1 


000403 




1 41 B 


0204 1 2 


1 1 2737 


000001 


1419 


020420 






1 420 


020420 


000422 




1 421 








1 422 


020466 






1 423 








1424 


020466 






1425 


020466 


01 2706 


001 100 


1426 


020472 


01 2737 


002332 


1427 


020500 


01 2737 


000340 


1428 


020506 


012737 


002400 


1429 


020514 


01 2737 


000340 


1430 


020522 


012700 


177777 


1431 


020526 


01 0037 


002334 


1432 


020532 


010037 


002402 


1433 


020536 


012737 


000340 


1434 


020544 


005037 


177572 


1435 









MOV 

CLR 
BITB 
BEQ 
MOV 



(SP)+,@#ERRVEC ; ;RESTORE ERROR VECTOR 



SPASS 

,.APTSIZE,$ENVM 
70$ 

#$SWREG,SWR 
70$: 

.SBTTL TYPE PROGRAM NAME 
•,;TYPE THE NAME OF THE PROGRAM 



INC 
BNE 
CMP 
BEQ 
TYPE 



73$: 
74$: 



;;72$: 
71$: 



000004 
000006 
000250 
000252 



#-1 
71$ 

#$ENDAD,i»#42 
71$ 
,72$ 



.SBTTL GET VALUE FOR SOFTWARE SW 



TST 
BNE 
CMPB 
BEQ 
CMP 
BNE 
GTSWR 
BR 

MOVB 
BR 

.ASCIZ 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
CLR 



@#42 
73$ 

$ENV,*1 

73$ 

SWR./fSWREG 
74$ 

74$ 

#1 ,$AUTOB 
71$ 

<CRLF>#CFKTHBO 



#STACK,KSP 

#TIMERR,ERRVEC 

/i'340,ERRVEC+2 

#MGMERR,MMVEC 

#340,MMVEC+2 

#-1 rRO 

RCTIMFLG 

RO.MGMFLG 

#340,TBITPS 

SRO 



; ; CLEAR PASS COUNT 
r.TEST USER SIZE UNDER APT 
; ; YES. USE NON-APT SWITCH 
;;NO.USE APT SWITCH REGISTER 



FIRST PASS 
;F1RST TiME? 
; BRANCH IF NO 
;ACT-1 1? 
; BRANCH IF YES 
;TYPE ASCIZ STRING 
ITCH REGISTER 

;ARE WE RUNNING UNDER XXDP/ACT7 

; BRANCH IF YES 

;ARE WE RUNNING UNDER APT? 

; BRANCH IF YES 

; SOFTWARE SWITCH REG SELECTED? 

; BRANCH IF NO 

;GET SOFT-SWR SETTINGS 



;;SET AUTO-MODE INDICATOR 

; ;GET OVER THE ASCIZ 

11/34 MEMORY MGMT . DIAG.#<CRLF> 



{INITIALIZE THE STACK POINTER 

JLOAD CPU SERVICE ROUTINE INTO TRAP VECTOR 

;SET NEW PS TO PRIORITY LEVEL 7-KERNEL 

JLOAD MEMORY MANAGENT ROUTINE INTO VECTOR 

;SET NEW PS TO PRIORITY LEVEL 7-KERNEL 

;PUT -1 INTO RO TO INITIALIZE FLAGS 

•.INITIALIZE CPU ERROR FLAG 

INITIALIZE MEMORY MANAGEMENT ERROR FLAG 

; INITIALIZE LOG THAT HOLDS T-BIT PSW 

;BE SURE MEM. MG.MT IS OFF TO START WITH 
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SEQ 0031 



1436 
1437 
1438 
1439 
1440 
1441 
1442 
1443 
1444 
1445 
1446 
1447 
1448 
1449 
1450 
1451 
1452 
1453 
1454 
1455 
1456 
1457 
1458 
1459 
1460 
1461 
1462 
1463 
1464 
1465 
1466 
1467 
1468 
1469 
1470 
1471 
1472 
1473 
1474 
1475 
1476 
1477 
1478 
1479 
1480 
1481 
1482 
1483 
1484 
1485 
1486 
1487 
1488 
1489 
1490 
1491 



PSW PRIORITY BIT TEST 



THIS TEST READS AND WRITES THE PROCESSOR STATUS WORD <7:5> "PRIORITY BITS" 
TO SEE THAT SOME OF THE BASIC "DATA PATH" LOGIC IS WORKING. 



020550 


000004 






TST1 : 


SCOPE 






020552 


01 2737 


020562 


001110 


1$: 


MOV 


iy2$,$LPERR 


SET LOOP ON ERROR POINTER TO 2$ 


020560 


005000 








CLR 


RO 


INITIALIZE RO WITH PRIORITY=0 DATA 


020562 


005001 






2$: 


CLR 


R1 


PREPARE R1 TO ACCEPT DATA READ 


020564 


106400 








MTPS 


RO 


WRITE PRIORITY BITS IN THE PSW 


020566 


106701 








MFPS 


R1 


READ BACK THE LOW BYTE OF PSW 


020570 


042701 


177437 






BIC 


#177437, R1 


MASK OFF EVERYTHING EXCEPT PRIORITY BITS 


020574 


020001 








CMP 


R0,R1 


WAS CORRECT PRIORITY SET IN THE PSW? 


020576 


001401 








BEQ 


3$ 


BRANCH IF YES 


020600 


104003 








ERROR 


3 


PRIORITY BITS SET WRONG IN PSW 
FOR TIGHTER SCnPE LOOP 
REPLACE ERROR CALL WITH 
"BR 2$" = 000770 


020602 


062700 


000040 




3$: 


ADD 


#40, RO 


CHANGE DATA TO NEXT PRIORITY 


020606 


022700 


000400 






CMP 


#400, RO 


HAVE PRIORITIES 0-7 ALL BEEN CHECKED? 


020612 


001363 








BNE 


2$ 


BRANCH IF NO 


020614 


012737 


020552 


001110 




MOV 


#1$,$LPERR 


RESET LOOP ON ERROR POINTER TO 1$ 



*TEST 2 PSW MODE BIT TEST 

* THIS TEST READS AND WRITES THE PROCESSOR STATUS WORD <15:12> "MODE BITS" 

« TO FURTHER CHECK THE BASIC CPU DATA PATHS 



4i*«4n|i*4<4r4i4ti|ii|i4(****4i4i4ii|i4i«*i* 



« *r * ■» 4< « « « « * * >«> 4> « 



020622 


000u04 






TST 2: 


SCOPE 






020624 


01 2737 


020634 


001110 


1$: 


MOV 


#2$,$LPERR 


SET LOOP ON ERROR POINTER TO 2$ 


020632 


005000 








CLR 


RO 


INITIALIZE RO WITH MODE BITS = 0000 


020634 


005037 


177776 




2$: 


CLR 


PSW 


INITIALIZE PSW 


020640 


050037 


177776 






BIS 


R0,PSW 


BIT SET THE PSW MODE BITS WITH RO 


020644 


01 3701 


177776 






MOV 


PSW,R1 


READ BACK THE CONTENTS OF THE PSW 


020650 


042701 


007777 






BIC 


#007777, R1 


MASK OFF EVERYTHING EXCEPT THE MODE 


020654 


020001 








CMP 


RO.RI 


WERE THE MODE BITS SET CORRECTLY? 


020656 


001403 








BEQ 


3$ 


BRANCH IF YES 


020660 


005037 


177776 






CLR 


PSW 


CLEAR PSW FOR ERROR REPORT 


020664 


104004 








ERROR 


-4 


MODE BITS SET WRONG IN PSW 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 2$" = 000763 


020666 


062700 


010000 




3S: 


ADD 


#10000,R0 


CHANGE MODE BIT DATA 


020672 


001360 








BNE 


2$ 


BRANCH IF STILL MORE COMBINATIONS 


020674 


012737 


020624 


001110 




MOV 


#1S,$LPERR 


RESET LOOP ON ERROR POINTER TO 1$ 


020702 


005037 


177776 






CLR 


PSW 


RESET PSW BEFORE LEAVING 



»TEST 3 BYTE ADDRESSING TEST FOR PSW 

* 

« THIS TEST WRITES THE HIGH AND LOW BYTES OF THE PROCESSOR STATUS WORD 



CFKTHBO PDP 11/34 MEM MGNT DIAG MACY11 30A{1052) 27-JUN-78 09:33 PAGF 33 
CFKTHB.PH 27-vjUN-78 09:27 T3 BYTE ADDRESSING TEST FOR PSW 



SE9 0032 



1492 
1493 
1494 
1495 
1496 
1497 
1498 
1499 
1500 
1501 
1502 
1503 
1504 
1505 
1506 
1507 
1508 
1509 
1510 



AND READS THEM BACK TO BE SURE THEY CAN BE WRITTEN INDEPENDEWTLY. 



1525 
1526 
1527 
1528 
1529 
1530 
1531 
1532 
1533 
1534 
1535 
1536 
1537 
1538 
1539 
1540 
1541 
1542 
1543 
1544 
1545 
1546 
1547 









• * 


THIS 


CHECKS THE PSW PORTION OF THE ADDRESS DETECTION LOGIC. 










020706 


000004 




TST3: 


SCOPE 






020710 


01 2737 


020716 001110 


1$: 


MOV 


#2$,$LPERR 


;SET LOOP ON ERROR POINTER TO 2$ 


020716 


005037 


177776 


2$: 


CLR 


PSW 


;CLEAR THE PSW 


020722 


01 2700 


000360 




MOV 


*360,R0 


;PUT THE HIGH BYTE DATA INTO RO 


020726 


1 1 0037 


177777 




MOVB 


R0,PSW+1 


JWRITE THE HIGH BYTE OF THE PSW 


020732 


01 3701 


177776 




MOV 


PSW.RI 


.READ BACK THE ENTIRE PSW 


020736 


042701 


007437 




BIC 


#007437, R1 


;MASK OFF THE T S CC BITS 


020742 


000300 






SWAB 


RO 


GET DATA WRITTEN IN HIGH BYTE OF RO 


020744 


020001 






CMP 


R0,R1 


WAS THE PSW WRITTEN TO CORRECTLY 


020746 


001 :03 






BEQ 


3$ 


BRANCH IF YES 


020750 


005037 


177776 




CLR 


PSW 


CLEAR PSW FOR ERROR REPORT 


020754 


104005 






ERROR 


5 


LOW BYTE EFFECTED BY WRITE TO HIGH BY! 



151 1 


020756 


01 2737 


020764 


001110 


3$: 


MOV 


#4$,$LPERR 


1512 


020764 


005037 


177776 




4$: 


CLR 


PSW 


1513 


020770 


01 2700 


000340 






MOV 


#340, RO 


1514 


020774 


1 1 0037 


177776 






MOVB 


RO,PSW 


1515 


021000 


01 3701 


177776 






MOV 


r'SW.RI 


1516 


021004 


042701 


007437 






BIC 


#007437, R1 


1517 


021010 


020001 








CMP 


R0,R1 
5$ 


1518 


021012 


001403 








BEQ 


1519 


021014 


005037 


177776 






CLR 


PSW 


1520 


021020 


104005 








ERROR 


5 


1521 
















1522 
















1523 
















1524 


021022 


012737 


020710 


001110 


5$: 


MOV 


#1$.$LPERR 



FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 2$" = 000760 
SET LOOP ON ERROR POINTER TO 4$ 
CLEAR THE PSW 

PUT THE LOW BYTE DATA INTO RO 
WRITE THE LOW BYTE OF THE PSW 
READ BACK THE ENTIRE PSW 
MASK OFF THE T&CC BITS 
WAS PSW WRITTEN TO CORRECTLY 
BRANCH IF YES 

CLEAR PSW FOR ERROR REPORT 

HIGH BYTE EFFECTED BY WRITE TO LOW BYTE OF PSW 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 2$" = 000736 

RESET LOOP ON ERROR POINTER TO 1$ 
;*TEST 4 TEST AND SETUP OF STACK POINTERS 

; ♦ 

;* THIS TEST SETS THE USER AND KERNEL STACK POINTERS FOR THE 

;* REST OF THE PROGRAM AND MAKES SURE THEY ARE INDEPENDENT OF 

;* EACH OTHER. KERNEL R6 IS SET TO 1100. USER R6 IS SET TO 700. THEN 

;* KERNEL R6 IS READ TO BE SURE ITS STILL 1100. 



021030 000004 
021032 005037 



021036 
021042 

021050 012706 

021054 005037 

021060 022706 

021064 001404 

021066 012700 

021072 010601 

021074 104006 



177776 
012706 001100 
012737 140000 
000700 
177776 
001100 



001100 



SCOPE 






CLR 


PSW 


;G0 TO KERNEL MODE 


MOV 


#KERSTK,KSP 


;SET KERNEL STACK POINTER TO 1100 


MOV 


#140000, PSW 


;G0 TO USER MODE 


MOV 


#USESTK,USP 


;SET USER STACK POINTER TO 700 


CLR 


PSW 


JBACK TO KERNEL MODE 


CMP 


#KERSTK,KSP 


;IS KERNEL R6 STILL 1100? 


BEQ 


TST5 


;;BRANCH IF KERNEL R6 IS OKAY 


MOV 


#KERSTK,RO 


;SAVE DATA WRITTEN FOR ERROR REPORT 


MOV 


KSP.RI 


;SAVE DATA READ AFTER USER R6 WAS WRITTEN 


ERROR 


6 


; KERNEL R6 CHANGED BY WRITING USER R6 






IFOR TIGHTER SCOPE LOOP 






{REPLACE ERROR CALL WITH 



CFKTHBO PDP 11/34 MEM MGNT DIAG MACY11 30A(1052) 27-JUN-78 09:33 PAGE 34 
CFKTHB.P11 27-JUN-78 09:27 T4 TEST AND SETUP OF STACK POINTERS 



SEQ 0033 



1548 








1549 








1550 








1551 








1552 








1553 








1554 








1555 








1556 








1557 








1558 








1559 








1560 








1561 








1562 








1563 








1564 








1565 








1566 








1567 








1568 








1569 








1570 








1571 








1572 








1573 








1574 


021076 


000004 




1575 








1576 


021 100 


012737 


021142 


1577 


021 106 


012737 


021200 


1578 


021 1 14 


01 2700 


177572 


1579 


021 120 


01 2701 


000003 


1580 


021 124 


012737 


177777 


1581 


021 132 


005037 


001376 


1582 


021 136 


005037 


001400 


1583 


021142 


005710 




1584 








1585 


021 144 


062700 


000002 


1586 


021 150 


077104 




1587 


021 152 


01 2737 


021100 


1588 


021 160 


005737 


001400 


1589 


021 164 


001401 




1590 


021 166 


104010 




1591 


021 170 


012737 


002332 


1592 


021 176 


000414 




1593 








1594 


021200 


062706 


000004 


1595 


021204 


104007 




1596 








1597 








1598 








1599 


021206 


01 0002 




1600 


021210 


050''37 


001376 


1601 


021214 


005102 




1602 


021216 


040237 


001374 


1603 


021222 


005237 


001400 



» THE NEXT FIVE (5) TESTS WILL TRY TO ADDRESS ALL OF THE 

MEMORY MANAGEMENT REGISTERS ( SRO , SRI , SR2 , KERNEL & USER PAR/PDR'S). 
» EVERY TIME A REGISTER TIMES OUT ITS ADDRESS WILL BE REPORTED. 

» AT THE END OF EACH TEST A SUMMARY OF THE ADDRESSES THAT TIMED 

• OUT DURING THAT TEST IS GIVEN. THE RESULTS OF "AND-ING" AND "OR-INQ« 
» THEIR ADDRESSES IS GIVEN TO SHOW WHICH ADDRESS LINES MAY BE 

• STUCK AT OR 1. THE PAR/PDR ADDRESS AND KT MUX'S ARE THE 
> THINGS BEING CHECKED. 

'^it'^^if^iiiit^ii^i^i^t*** ************************************** ********** 



'iHnH^iftt^******************************************************** 

•TEST 5 SR0,SR1,SR2 TIMEOUT TEST 

* 

* THIS TEST ADDRESSES THE MEMORY MANAGEMENT STATUS REGISTERS 

* 0,1, AND 2. STATUS REG. 1 IS NOT USED BUT SHOULD STILL 

* RESPOND TO ITS UNIBUS ADDRESS. DATA WILL BE WRITTEN OR READ 

* FROM THESE REGISTERS IN LATER TESTS. THIS TEST JUST CHECK 

* FOR A RESPONSE. 



i^itiDtm******* 

TST5: SCOPE 



001110 1$: 
000004 



2$: 



3$: 



001110 



000004 4$: 

5$: 



MOV 
MOV 
MOV 
MOV 
MOV 
CLR 
CLR 
TST 

ADD 

SOB 

MOV 

TST 

BEQ 

ERROR 

MOV 

BR 

ADD 
ERROR 



MOV 
BIS 
COM 
BIC 
INC 



#2$,$LPERR 
#5$,f»#4 
#SRO,RO 
#3,R1 

#-1 .ANDADR 
ORADR 
TONUM 
(RO) 

#2,R0 
R1 .2$ 

#1$,$LPERR 

TONUM 

4$ 

10 

#TIMERR,I»#4 

TST6 

#4,KSP 

7 



R0.R2 
R2, ORADR 
R2 

R2,ANDADR 
TONUM 



^itt-#******** ******** 



SET LOOP ON ERROR POINTER TO 2$ 

SET TIMEOUT VECTOR TO 5$ 

LOAD RO WITH ADDRESS OF FIRST REG. 

LOAD R1 WITH THE LOOP COUNT 

INITIALIZE "AND" OF ADDRS. LOC. 

INITIALIZE "OR" OF ADDRS. LOC. 

INITIALIZE "TIMEOUTS" COUNTER 

TRY ADDRESSING A STATUS REGISTER 

IF IT TIMES OUT GO TO 5$ 

PUT NEXT ADDRESS IN RO 

LOOP BACK TO 2$ UNTIL ALL TESTED 

RESET LOOP ON ERROR POINTER TO 1$ 

DID ANY OF THE STATUS REG.S TIMEOUT? 

BRANCH IF NO 

SUMMARY OF STATUS REG. TIMEOUTS 
RESTORE NORMAL CPU TRAP ROUTINE ADDRESS 
:G0 TO NEXT TEST 

CLEAN UP THE STACK 

ONE OF THE STATUS REGS. TIMED OUT 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 2$" = 000756 

LOAD THE ADDRESS THAT TIMED OUT INTO R2 
"OR" IT WITH OTHER ADDRS. THAT TIMED OUT 
"AND" IT WITH OTHER ADDRS. THAT TIMED OUT 



INCREMENT THE TIMEOUT COUNTER 



CFKTHBO PDP 11/34 MEM MGNT DUG MACY11 30A(1052) 27-JUN-78 09:33 PAGE 35 
CFKTHB.PI 1 27-JUN-78 09:27 T5 SR0,SR1 ,SR2 TIMEOUT TEST 



SEO 0034 



1604 
1605 
1606 
1607 
1608 
1609 
1610 
161 1 
1612 
1613 
1614 
1615 
1616 
1617 
1618 
1619 
1620 
1621 
1622 
1623 
1624 
1625 
1626 
1627 
1628 
1629 
1630 
1631 
1632 
1633 
1634 
1635 
1636 
1637 
1638 
1639 
1640 
1641 
1642 
1643 
1644 
1645 
1646 
1647 
1648 
1649 
1650 
1651 
1652 
1653 
1654 
1655 
1656 
1657 
1658 
1659 



021226 000746 



; BRANCH BACK TO TEST THE NEXT ADDR. 



4TEST 6 



KERNEL PAR'S TIMEOUT TEST 



THIS TEST ADDRESSES THE EIGHT (8) KERNEL PAGE ADDRESS 
REGISTERS ( KI PARO-KI PAR7 ) AND CHECKS THAT SOMETHING 
RESPONDS TO THEIR ADDRESSES. 



;***i|i4>**iti*:»4i«i»4>*i|i*«i|i*>«<iti4<4>i|i4i*4i*i|<4i*4i**«:»«4:4i 



021230 


000004 






TST6: 


SCOPE 






021232 


012737 


021274 


001 110 


1$! 


MOV 


A'2S,$LPERR 


;SET LOOP ON ERROR POINTER TO 2$ 


021240 


012737 


021332 


000004 




MOV 




;SET TIMEOUT VECTOR TO 5$ 


021246 


01 2700 


172340 






MOV 


#KIPAR0,R0 


JLOAD RO WITH ADDRESS OF FIRST REG. 


021252 


012701 


000010 






MOV 


#10, R1 


•.LOAD R1 WITH LOOP COUNT (8) 


021256 


012737 


177777 


001374 




MOV 


#-1 .ANDADR 


; INITIALIZE "AND" OF ADDR. LOG 


021264 


005037 


001376 






CLR 


ORADR 


; INITIALIZE "OR" OF ADDR. LOC. 


021270 


005037 


001400 






CLR 


TONUM 


•.INITIALIZE "TIMEOUTS" COUNTER 


021274 


005710 






2$: 


TST 


(RO) 


;TRY ADDRESSING A KIPAR 
















; IF IT TIMES OUT, WILL GO TO 5$ 


021276 


062700 


000002 




3$: 


ADD 




;PUT NEXT KIPAR ADDRESS IN RO 


021302 


077104 








SOB 


R1 ,2$ 


;LOOP BACK TO 2$ UNTIL ALL TESTED 


021304 


01 2737 


021232 


001110 




MOV 


#1$,$LPERR 


JRESET LOOP ON ERROR POINTER TO 1$ 


021312 


005737 


001400 






TST 


TONUM 


;DID ANY OF THE KIPARS TIME OUT? 


021316 


001401 








BEQ 


4$ 


1 BRANCH IF NO 


021320 


104010 








ERROR 


10 


; SUMMARY OF KIPAR TIMEOUTS 


021322 


01 2737 


002332 


000004 


4$: 


MOV 


#TIMERR,9#4 


; RESTORE NORMAL CPU TRAP ROUTINE ADDRESS 


021330 


000414 








BR 


TST7 


; ;G0 TO NEXT TEST 


021332 


062706 


000004 




S$J 


ADD 


#4,KSP 


JCLEAN UP THE STACK 


021336 


104007 








ERROR 


7 


;ONE OF THE KIPARS TIMED OUT 
















•.FOR TIGHTER SCOPE LOOP 
















{REPLACE ERROR CALL WITH 
















;»BR 2$" = 000756 


021340 


010002 








MOV 


R0,R2 


JLOAD THE ADDRESS THAT TIMED OUT INTO R2 


021342 


050237 


001376 






BIS 


R2, ORADR 


;"0R" IT WITH OTHER ADDRS. THAT TIMED OUT 


021346 


005102 








COM 


R2 


;"AND" IT WITH OTHER ADDRS. THAT TIMED OUT 


021350 


040237 


001374 






BIG 


R2, ANDADR 




021354 


005237 


001400 






INC 


TONUM 


; INCREMENT THE TIMEOUT COUNTER 


021360 


000746 








BR 


3$ 


; BRANCH BACK TO TEST THE NEXT KIPAR 



AERNEL PDR'S TIMEOUT TEST 



THIS TEST ADDRESSES THE EIGHT {€] KERNEL PAGE DESCRIPTOR 
REGISTERS (KIPDR0-KIPDR7) AND CHECKS THAT SOMETHING 
RESPONDS TO THEIR ADDRESSES. 



021362 000004 



TST7: SCOPE 



021364 012737 
021372 012737 



021400 
021404 012701 



021426 
021464 
012700 172300 



001110 
000004 



IS! 



MOV 
MOV 
MOV 
MOV 



#2$,$LPERR 
#5$,@#4 
#KIPDR0.R0 
«I10,R1 



;SET LOOP ON ERROR POINTER TO 2$ 
;SET TIMEOUT VECTOR TO 5$ 
;LOAO RO WITH ADDRESS OF FIRST REG. 
JLOAD R1 WITH LOOP COUNT (8) 



CFKTHBO PDP 11/34 MEM MGNT DIAG MACY11 30A(1052) 27-UUN-78 09:33 PAGF 36 
CFKTHB.P11 27-JUN-78 09:27 T7 KERNEL PDR'S TIMEOUT TEST 



1G60 


021410 


01 2737 


177777 


1661 


021416 


005037 


001376 


1662 


021422 


005037 


001400 


1663 


021426 


005710 




1664 








1665 


021430 


062700 


000002 


1666 


021434 


077104 




1667 


021436 


01 2727 


021364 


1668 


021444 


005737 


001400 


1669 


021450 


001401 




1670 


021452 


104010 




1671 


021454 


012737 


002332 


1672 


021462 


000414 




1673 








1674 


021464 


062706 


000004 


1G75 


021470 


104007 




1676 








1677 








1678 








1679 


021472 


01 0002 




1680 


021474 


050^3/ 


001376 


1681 


02150C 


005102 




1682 


021502 


040237 


001374 


1683 


021506 


005237 


001400 


16B4 


021512 


000746 




1685 








1686 








1687 








1688 








1689 








1690 








1691 








1692 








1693 








1694 


021514 


000004 




1695 








1696 


021516 


01 2737 


021560 


1697 


021524 


01 2737 


021616 


1698 


021532 


01 2700 


177640 


1699 


021536 


01 2701 


000010 


1700 


021542 


01 2737 


177777 


1701 


021550 


005037 


001376 


1702 


021554 


005037 


001400 


1703 


021560 


005710 




1 704 








1705 


021562 


062700 


000002 


1706 


021566 


077104 




1707 


021570 


01 2737 


021516 


1708 


021576 


005737 


001400 


1709 


021602 


001401 




1710 


021604 


104010 




171 1 


021606 


012737 


002332 


1712 


021614 


000414 




1713 








1714 


021616 


062706 


000004 


1715 


021622 


104007 





2$: 
3S: 



000004 4$: 



MOV 
CLR 
CLR 
TST 

ADD 

SOB 

MOV 

TST 

BEQ 

ERROR 

MOV 

BR 

ADD 
ERROR 



MOV 
BIS 
COM 
BIC 
INC 
BR 



*-1 .ANDADR 
ORADR 
TONUM 
(RO) 

#2.R0 
R1 ,2$ 

#1$.$LPERR 

TONUM 

4$ 

10 

#TIMERR,@#4 
TST10 

#4,KSP 
7 



R0,R2 
R2. ORADR 
R2 

R2. ANDADR 

"ONUM 

3$ 



INITIALIZE "AND" OF ADDR. LOC 
INITIALIZE "OR" OF ADDR. LOC. 
INITIALIZE "TIMEOUTS" COUNTER 
TRY ADDRESSING A KIPDR 
IF IT TIMES OUT, WILL GO TO 5$ 
PUT NEXT KIPDR ADDRESS IN RO 
LOOP BACK TO 2$ UNTIL ALL TESTED 
RESET LOOP ON ERROR POINTER TO 1$ 
DID ANY OF THE KIPDRS TIME OUT? 
BRANCH IF NO 

SUMMARY OF KIPDR TIMEOUTS 

RESTORE NORMAL CPU TRAP ROUTINE ADDRESS 

;G0 TO NEXT TEST 

CLEAN UP THE STACK 
ONE OF THE KIPDRS TIMED OUT 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 2$" = 000756 

LOAD THE ADDRESS THAT TIMED OUT INTO R2 
"OR" IT WITH OTHER ADDRS. THAT TIMED OUT 
"AND" IT WITH OTHER ADDRS. THAT TIMED OUT 

•.INCREMENT THE TIMEOUT COUNTER 

; BRANCH BACK TO TEST THE NEXT KIPDR 



*TEST 10 USER PAR'S TIMEOUT TEST 



THIS TEST ADDRESSES THE EIGHT (8) USER PAGE ADDRESS 
REGISTERS (UIPAR0-UIPAR7) AND CHECKS THAT SOMETHING 
RESPONDS TO THEIR ADDRESSES. 



TSTIO: SCOPE 



001110 1$: 
000004 



001110 

00000^ 4$: 

SS: 



MOV 


#2$.$LPERR 


SET LOOP ON ERROR POINTER TO 2$ 


MOV 


«y5$.@#4 


SET TIMEOUT VECTOR TO 5$ 


MOV 


#UIPAR0,R0 


LOAD RO WITH ADDRESS OF FIRST REG. 


MOV 


#10. R1 


LOAD R1 WITH LOOP COUNT (8) 


MOV 


#-1 .ANDADR 


INITIALIZE "AND" OF ADDR. LOC 


CLR 


ORADR 


INITIALIZE "OR" OF ADDR. LOC. 


CLR 


TONUM 


INITIALIZE "TIMEOUTS" COUNTER 


TST 


(RO) 


TRY ADDRESSING A UIPAR 






IF IT TIMES OUT, WILL GO TO 5$ 


ADD 


*2,R0 


PUT NEXT UIPAR ADDRESS IN RO 


SOB 


R1 ,2$ 


LOOP BACK TO 2$ UNTIL ALL TESTED 


MOV 


#1$,SLPERR 


RESET LOOP ON ERROR POINTER TO 1$ 


TST 


TONUM 


DID ANY OF THE UIPARS TIME OUT? 


BEQ 


4$ 


BRANCH IF NO 


ERROR 


10 


SUMMARY OF UIPAR TIMEOUTS 


MOV 


#TIMERR,»#4 


RESTORE NORMAL CPU TRAP ROUTINE ADDRESS 


BR 


TST11 


;G0 TO NEXT TEST 


ADD 


if4,KSP 


CLEAN UP THE STACK 


ERROR 


7 


ONE OF THE UIPARS TIMED OUT 



CFKTHBO POP 11/34 MEM MGNT DUG MACY11 30A( 1052) 27-JUN-78 09:33 PAGE 37 
CFKTHB.P11 27-JUN-78 09:27 TlO USER PAR'S TIMEOUT TEST 



SEQ 0036 



1716 








1717 








1718 








1719 


021624 


01 0002 




1720 


021626 


050237 


001376 


1721 


021632 


005102 




1722 


021634 


040237 


001374 


1723 


021640 


005237 


001400 


1724 


021644 


000746 




1725 








1726 








1727 








1728 








1729 








1730 








1731 








1732 








1733 








1734 


021646 


000004 




1735 








1736 


021650 


012737 


021712 


1737 


021656 


01 2737 


021750 


1738 


021664 


01 2700 


177600 


1739 


021670 


01 2701 


000010 


1740 


021674 


012737 


177777 


1741 


021702 


005037 


001376 


1742 


021706 


005037 


001400 


1743 


021712 


005710 




1 744 








1745 


021714 


062700 


000002 


1746 


021720 


077104 


021650 


1747 


021722 


012737 


1748 


021730 


005737 


001400 


1749 


021734 


001401 




1750 


021736 


104010 




1751 


021740 


01 2737 


002333 


1752 


021746 


000414 




1753 








1754 


021750 


062706 


000004 


1755 


021754 


104007 




1756 








1757 








1750 








1759 


021756 


010002 




1760 


021760 


050237 


001376 


1761 


021764 


005102 




1762 


021766 


040237 


001374 


1763 


021772 


005237 


001400 


1764 


021776 


000746 




1765 








1766 








1767 








1768 








1769 








1770 








1771 









;FOR TIGHTER SCOPE LOOP 
.•REPLACE ERROR CALL WITH 
;»BR 2$" = 000756 

JLOAD THE ADDRESS THAT TIMED OUT INTO R2 
;"0R" IT WITH OTHER ADDRS. THAT TIMED OUT 
;"AND" 1: WITH OTHER ADDRS. THAT TIMED OUT 

; INCREMENT THE TIMEOUT COUNTER 
{BRANCH BACK TO TEST THE NEXT UIPAR 



TEST 11 USER PDR'S TIMEOUT TEST 

THIS TEST ADDRESSES THE EIGHT (8) USER PAGE DESCRIPTOR 
REGISTERS (UIPDR0-UIPDR7) AND CHECKS THAT SOMETHING 
RESPONDS TO THEIR ADDRESSES. 



MOV 


kO,R2 


BIS 


R2,0RADR 


COM 


R2 


BIC 


R2,ANDADR 


INC 


TONUM 


BR 


3$ 



TSTIl: SCOPE 



fHtiiHHf********f$********************** 



.^iti************* 



001110 1$: 
000004 



001374 



3$: 



OOlllt 



000004 4$: 
5$: 



MOV 
MOV 
MOV 
MOV 
MOV 
CLR 
CLR 
TST 

ADD 

SOB 

MOV 

TST 

BEO 

ERROR 

MOV 

BR 

ADD 
ERROR 



MOV 
BIS 
COM 
BIC 
INC 
BR 



#2S,$LPERR 
#5$, 0^4 

lyUIPDRO.RO 

*10,R1 

#-1 ,ANDADR 

ORADR 

TONUM 

(RO) 

#2,R0 
R1 ,2$ 

#1S,$LPERR 

TONUM 

4$ 

10 

#TIMERR,##4 
TST12 

#4,KSP 
7 



R0,R2 
R2, ORADR 
R2 

R2,ANDADR 

TONUM 

3$ 



SET LOOP ON ERROR POINTER TO 2$ 
SET TIMEOUT VECTOR TO 5$ 
LOAD RO WITH ADDRESS OF FIRST R£6. 
LOAD R1 WITH LOOP COUNT (8) 
INITIALIZE "AND" OF ADDR . LOC 
INITIALIZE "OR" OF ADDR. LOC. 
INITIALIZE "TIMEOUTS" COUNTER 
TRY ADDRESSING A UIPDR 
IF IT TIMES OUT. WILL GO TO 5$ 
PUT NEXT UIPDR ADDRESS IN RO 
LOOP BACK TO 2$ UNTIL ALL TESTED 
RESET LOOP ON ERROR POINTER TO 1$ 
DID ANY OF THE UIPDRS TIME 0UT7 
BRANCH IF NO 

SUMMARY OF UIPDR TIMEOUTS 

RESTORE NORMAL CPU TRAP ROUTINE ADDRESS 

;G0 TO NEXT TEST 

CLEAN UP THE STACK 
ONE Or THE UIPDRS TIMCD OUT 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 2$" = 000756 

LOAD THE ADDRESS THAT TIMED OUT INTO R2 
"OR" IT WITH OTHER ADDRS. THAT TIMED OUT 
"AND" IT WITH OTHER ADDRS. THAT TIMED OUT 

INCREMENT THE TIMEOUT COUNTER 
BRANCH BACK TO TEST THE NEXT UIPDR 



;«TEST 12 SR0(15:13) BIT TEST & SR2 TEST 

; • 

;* THIS TEST CHECKS BITS <15:13> OF STATUS REGISTER TO SEE 

;* THAT EACH CAN BE SET AND CLEARED AND THAT A "RESET" WILL 

;« CLEAR ALL OF THEM. A TEST OP THESE THREE ERROR BITS CHECKS 
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CFKTHB 


P1 1 


27-UUN-7a 


09:27 


1772 








1773 








1774 








1775 








1776 








1777 








1778 


02S000 


000004 




1779 








1780 


022002 


012700 


177572 


1781 


022006 


012710 


160000 


1782 


022012 


000005 




1783 


022014 


01 1001 




1784 


022016 


001404 




1785 


022020 


10401 1 




1786 








1787 








1788 








1789 


022022 


012737 


022030 


1790 


022030 


01 3737 


177576 


1791 


022036 


012701 


022030 


1792 


022042 


020137 


001370 


1793 


022046 


001401 




1794 


022050 


104041 




1795 








1796 








1797 








1798 


022052 


01 2737 


022070 


1799 


022060 


01 2701 


100000 


1300 


022064 


012703 


000003 


1801 


022070 


005010 




1802 


022072 


0501 10 




1803 


022074 


01 1002 




1804 


022076 


020102 




1805 


022100 


001401 




1806 


022102 


104012 




1807 








1808 








1809 








1810 


022104 


012704 


022073 


181 1 


0221 10 


013737 


177576 


1812 


0221 16 


020437 


001370 


1013 








1814 


022122 


001401 




1815 


022124 


104064 




1816 








1817 








1818 








1819 


022126 


006001 




1820 


022130 


077321 




1821 


022132 


005010 




1822 


022134 


012737 


022003 


1823 








1824 








1825 








1826 








1827 









SEQ 0037 



PART OF SRO, THE SRO MUX AND THE KTMUX. THE REST OF THE 

BITS IN SRO WILL BE CHECKED LATER. 

ALSO CHECK THAT SR2 IS TRACKING WITH MEM. MGMT. 

OFF BUT LOCKS UP WHEN ANY OF SRO ERROR BITS SET. 



1itti$ift*****************m*******A 

TST12! SCOPE 



lH)Lftt,IHlift**'0**************lltt*0tlH,** 



1$S 



001110 3$: 



4$: 
SS: 



MOV 

MOV 

RESET 

MOV 

BEQ 

ERROR 



MOV 
MOV 
MOV 
CMP 
BEQ 
ERROR 



MOV 
MOV 
MOV 
CLR 
BIS 
MOV 
CMP 
BEQ 
ERROR 



MOV 
MOV 
CMP 

BEQ 
ERROR 



ROR 
SOB 
CLR 
MOV 



#SRO,RO 
#160000, (RO) 

(R0),R1 

2$ 

11 



#2$,$LPERR 

SR2,WASSR2 

#2$,R1 

R1 ,WASSR2 

3$ 

41 



(f4$,$LPERR 

#BIT15,R1 

#3,R3 

(RO) 

R1 ,(R0) 

(R0),R2 

R1 ,R2 

6$ 

12 



ll'5$,R4 

SR2,WASSR3 

R4,WASSR2 

7$ 
J4 



R1 

R3,4$ 
(RO) 

#1$,$LPERR 



•.LOAD ADDRESS OF SRO INTO RO 

;SET BITS <15:13> IN SRO (ERROR BITS) 

; ISSUE AND "INIT" SIGNAL 

'.READ SRO INTO R1 TO SEE IF CLEAR 

;BRANCH IF SR0<15:13> CLEARED BY "INIT" 

;SR0<15:13> NOT CLEARED BY A "RESET" 

;FOR TIGHTER SCOPE LOOP 

JREPLACE ERROR CALL WITH 

; "BR 1$" = 000770 

;SET LOOP ON ERROR POINTER TO 2$ 

JREAD CONTENTS OF SR2 

jLOAD EXPECTED CONTENTS INTO R1 

;IS SR2 TRACKING? 

; BRANCH IF YES 

;SR2 NOT "TRACKING" VIRTUAL ADDRESSES 

JFOR TIGHTER SCOPE LOOP 

;REPLACE ERROR CALL WITH 

;"BR 2$" = 000767 

;SET LOOP ON ERROR POINTER TO 4$ 

;PUT DATA TO BE WRITTEN IN R1 

; SETUP R3 AS A LOOP COUNTER 

;CLEAR SRO 

;SET ONE OF THE ERROR BITS IN SRO 

;READ SRO INTO R2 

;DID RIGHT ERROR BIT GET SET? 

; BRANCH IF YES 

JBITS WERE SET WRONG IN SRO 

•.FOR TIGHTER SCOPE LOOP 

•.REPLACE ERROR CALL WITH 

;"BR 4$" u 000772 

jLOAD EXPECTED CONTENTS OF SR2 IN R4 
;READ SR2 

;DID SR2 LOCK UP WHEN ERROR 

JBIT SET IN SRI? 

; BRANCH IF YES 

;SR2 DID NOT LOCK UP 

;FOR TIGHTER SCOPE LOOP 

.•REPLACE ERROR CALL WITH 

;"BR 4$" » 000761 

; CHANGE DATA TO CHECK NEXT ERROR BIT 
•.LOOP BACK UNTIL <15:13> ALL TESTED 
;CLEAR SRO BEFORE LEAVING 
; RESET LOOP ON ERROR POINTER TO 1$ 



'i(i:#ot»^#iti*iiiiii*««ni****************************#**tint **************** 
•TEST 13 SRO & PSW DUAL ADDRESSING TEST 

* 

* THIS TEST CHECKS MORE OF THE ADDRESS DETECTION LOGIC BY 
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1P28 






1029 






1030 






1831 






1832 






1B33 






1834 


022142 


000004 


1835 






1836 


022144 


005037 


1837 


022150 


005037 


1338 


022154 


106427 


1839 


022160 


01 3700 


1340 


022164 


001401 


1841 


022166 


104':i3 


1U42 






1843 






1844 






1845 


022170 


005037 


1846 


022174 


005037 


1847 






1848 






1849 






1850 






1051 






1852 






1853 






1354 






1355 






1856 


022200 


000004 


1857 


022202 


012700 


1058 


022206 


013700 


1059 


022212 


001401 


1860 


022214 


104014 


1861 






1852 






1863 






1864 






1865 






1066 






1867 






1868 






1869 






1870 






1871 






1872 






1873 






1874 






1875 


022216 


000004 


1876 






1877 


022220 


01 2700 


1878 


022224 


012703 


1879 


022230 


01 2737 


1880 


022236 


005010 


1881 


022240 


01 1001 


1882 


022242 


001401 


1883 


022244 


10401 1 



177776 
177572 
000340 



177777 
177574 



VERIFYING THAT STATUS REGISTER IS NOT EFFECTED BY WRITING 
TO THE PSW AND THAT THE LOW BYTE OF STATUS REGISTER 
IS NOT EFFECTED BY WRITING TO ITS HIGH BYTE. THIS IS TO 
SEE IF ADJACENT OUTPUTS ARE SHORTED ON THE ADDRESS DET. LOGIC. 



• 4i«i»i|ii|ri|i*4r4<4i«4i«i»«**4i4i4i**4i*4i«*«4i4i4,ii 

TST13S SCOPE 



CLR 

CLR 

MTPS 

MOV 

BEQ 

ERROR 



CLR 
CLR 



PSW 

SRO 

*340 

SRO.RO 

2$ 

13 



SRO 
PSW 



CLEAR THE PSW 

CLEAR STATUS REGISTER 

SET PRIORITY 7 IN LOW BYTE OF PSW 

READ STATUS REGISTER 

BRANCH IF IT WAS STILL 

SRO EFFECTED BY A WRITE TO THE PSW 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 1$" = 000767 

BE SURE SRO IS BEFORE LEAVING 

BE SURE PSW IS BEFORE LEAVING 



TEST 14 



TEST THAT SRI 



READS ALL ZEROS 



THIS TE?"^S CHECKS THAT EVEN THOUGH STATUS REGISTER 1 

IS NON-EXISTENT, ITS ADDRESS SHOULD RESPOND WITH ALL ZEROS, 

THEREBY CHECK ANOTHER PORTION OF THE ADDRESS DETECTION LOGIC. 



»*r^itii»********i^***<*0***if*'ii0'«'*i^*** ********** 

TST14: SCOPE 

MOV (C-1,R0 

MOV SR1,R0 

BEO TST15 

ERROR 14 



H,**H,*****'^,****if*** 



;FILL RO WITH ALL ONES 
;READ SRI INTO RO 
;;BRANCH IF SRI READS ALL ZEROS 
;SR1 DID NOT READ ALL ZEROS 
;FOR TIGHTER SCOPE LOOP 
; REPLACE ERROR CALL WITH 
; 000772 



'•it:**************************************************** 

;*TEST 15 BIT TEST OF KERNEL a USER PAR'S 



I « itc « « * 4> « « # 



THE FOLLOWING TEST CHECKS THE BITS "ili:00> OF BOTH THE KERNEL 
AND USER PAGE ADDRESS REGISTERS. A "O" IS ROTATED THRU 
THE REGISTERS FROM LEFT TO RIGHT. THIS CHECKS THE OPERATION 
OF THE PAR/PDR ADDRESS MUX, THE KT MUX, AND THE PAR 
OUTPUT DATA LINES. 



; *************************** 

TST15: SCOPE 



***********! 



******** 



1$: 
2S: 



MOV 
MOV 
MOV 
CLR 
MOV 
BEQ 
ERROR 



iVKIPARO.RO 

#10, R3 

iCSS.SLPERR 

(RO) 

(R0),R1 

4$ 

11 



JLOAD ADDRESS OF FIRST PAR IN RO 

; SETUP R3 TO COUNT 8 PAR'S 

;SET LOOP ON ERROR POINTER TO 3$ 

JCLEAR THE PAR 

;READ THE PAR INTO R1 

; BRANCH IF PAR CLEARED OK 

;PAR WOULD NOT CLEAR 
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1884 
1885 
1886 
1887 
1888 
1889 
1890 
1891 
1892 
1893 
1894 
1895 
1896 
1897 
1898 
1899 
1900 
1901 
1902 
1903 
1904 
1905 
1906 
1907 
1908 
1909 
1910 



P1 1 


27-iJUN-78 


09:27 




T15 


BIT TEST OF KERNEL a USER PAR'S 
















FOR TIGHTER SCOPE LOOP 
















REPLACE ERROR CALL WITH 
















"BR 3$" = 000774 


022246 


01 2704 


167777 




4$: 


MOV 


« 167777, R4 


LOAD "WALKING 0" TEST PATTERN IN R4 


022252 


01 2737 


022260 


001110 




MOV 


#5$,$LPERR 


SET LOOP ON ERROR POINTER TO 5$ 


022260 


005010 






5$: 


CLR 


(RO) 


CLEAR 1 E P\n BEFORE LOADING DATA 


022262 


01 0401 








MOV 


R4,R1 


LOAD DATA INTO Rl 


022264 


042701 


170000 






BIC 


#170000, R1 


MASK UNUSED BITS OUT OF THE DATA 


022270 


0501 10 








BIS 


R1 , (RO) 


BIT SET THE TEST PATTERN INTO THE PAR 


022272 


01 1002 








MOV 


(RO) ,R2 


READ THE PAR INTO R2 


022274 


020102 








CMP 


R1 ,R2 


DOES DATA WRITTEN=DATA READ? 


022276 


001401 








BEQ 


6$ 


BRANCH IF YES 


022300 


104012 








ERROR 


12 


PAR BITS DID NOT SET CORRECTLY 
















FOR TIGHTER SCOPE LOOP 
















REPLACE ERROR CALL WITH 
















"BR 5$" = 000767 


022302 


000261 






6$: 


SEC 




SET THE C-BIT FOR THE ROTATE INST. 


022304 


006004 








ROR 


R4 


ROTATE THE TEST PATTERN IN R4 


022306 


103764 








BCS 


5$ 


BRANCH BACK IF MORE BITS TO TEST 


022310 


C62700 


000002 






ADD 


#2,R0 


GET NEXT PAR ADDRESS IN RO 


022314 


077330 








SOB 


R3,3$ 


BRANCH BACK UNTIL ALL PAR'S TESTED 


022316 


022700 


177660 






CMP 


#UIPAR7-t-2,R0 


HAVE USER PAR'S BEEN TESTED 


022322 


103003 








BHIS 


7$ 


BRANCH IF YES 


022324 


01 2700 


177640 






MOV 


ifUlPARO.RO 


LOAD FIRST USER PAR ADDR. IN RO 


022330 


000735 








BR 


2$ 


BRANCH BACK TO TEST USER PAR'S 


022332 


012737 


022220 


001110 


7$: 


MOV 


#1$,$LPERR 


RESET LOOP OR ERROR POINTER TO 1$ 



LEAVE TEST WITH BITS <1i:i>a1 IN ALL PAR'S 



CFKTHBO PDP 11/34 MEM MGNT DUG MACYIt 30A(1052) 27-JUN-7a 09:33 PAGE 41 
CFKTHB.P11 27-JUN-78 09:27 T16 BIT TEST OF KERNEL & USER PDR'S 



SEQ 0040 



1911 
1912 
1913 
1914 
1915 
1916 
1917 
1918 
1919 
1920 
1921 
1922 
1923 
1924 
1925 
1926 
1927 
1928 
1929 
1030 
1931 
1932 
1933 
1934 
1935 
1935 
1937 
1938 
1939 
1940 
1941 
1942 
1943 
1944 
1945 
1945 
1947 
1948 
1949 
1950 
1951 
1952 
1953 
1954 
1955 
1956 
1957 
1958 
1959 
1960 
1961 
1962 
1963 
1964 
1965 
1966 



022342 
022346 



022370 
022374 
022402 
022404 



012700 
01 2703 



022352 012737 

022360 005010 

022362 011001 

022364 001401 

022366 104011 



022406 042701 

022412 050110 

022414 011002 

022416 020102 

022420 001401 

022422 104012 



022424 000261 
022426 006004 



t *^,**i^***mtt***iit*ii, lit- it.* t ************ **************** 

•TEST 16 BIT TEST OF KERNEL & USER PDR'S 

* 

* THE FOLLOWING TEST CHECKS THE BITS <14:8> AND <3:1> OF BOTH THE 

* KERNEL AND USER PAGE DESCRIPTOR REGISTERS. A "0« IS ROTATED 

* THRU THE REGISTERS FROM LEFT TO RIGHT. SOME TEST PATTERNS WILL 
« BE LOADED MORE THAN ONCE DUE TO THE UNUSED BITS IN THE PDR'S. 

« THE PAR/PDR ADDRESS MUX, KTMUX, AND PDR OUTPUT DATA LINES 

* ARE BEING CHECKED. 



022340 000004 



'***********: 

TST16: SCOPE 



***************«***********************************# 



012704 
01 2737 
005010 
01 0401 



172300 
000010 
022360 



077777 

022402 001110 



103764 

062700 000002 



022430 
022432 

022436 077330 

022440 022700 

022444 103003 

022446 012700 

022452 000735 

022454 012737 022342 001110 7$: 



1$: 


MOV 


#KIPDRO,RO 


;LOAD ADDRESS OF FIRST PDR IN RO 


2$: 


MOV 


#10, R3 


; SETUP R3 TO COUNT 8 PDR'S 




MOV 


#3$,$LPERR 


;SET LOOP ON ERROR POINTER TO 3$ 


3$: 


CLR 


(RO) 


;CLEAR THE PDR 




MOV 


(R0),R1 


;READ THE PDR INTO R1 




BEQ 


4$ 


; BRANCH IF PDR CLEARED OK 




ERROR 


11 


;PDR WOULD NOT CLEAR 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 3$" » 000774 


4$: 


MOV 


#077777, R4 


LOAD "WALKING "0" TEST PATTERN IN R4 




MOV 


#5$,$LPERR 


SET LOOP ON ERROR POINTER TO 5$ 


5$: 


CLR 


(RO) 


CLEAR THE PDR BEFORE LOADING DATA 




MOV 


R4,R1 


LOAD DATA INTO R1 




BIC 


#100361 ,R1 


MASK UNUSED BITS OUT OF THE DATA 




BIS 


R1 ,(R0) 


BIT SET THE TEST PATTERN INTO THE PDR 




MOV 


(R0),R2 


READ THE PDR INTO R2 




CMP 


R1 ,R2 


DOES DATA WRITTEN»DATA READ? 




BEO 


6$ 


BRANCH IF YES 




ERROR 


12 


PDR BITS DID NOT SET CORRECTLY 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 5$" = 000767 


6$: 


SEC 




SET THE C-BIT FOR THE ROTATE INST. 




ROR 


R4 


ROTATE THE TEST PATTERN IN R4 




BCS 


5$ 


BRANCH BACK IF MORE BITS TO TEST 




ADD 


#2.R0 


GET NEXT PDR ADDRESS IN RO 




SOB 


R3 , 3$ 


BRANCH BACK UNTIL ALL PDR'S TESTED 




CMP 


#UIPDR7+2,R0 


HAVE USER PDR'S BEEN TESTED? 




BHIS 


7$ 


BRANCH IF YES 




MOV 


i^UIPDRO.RO 


LOAD FIRST USER PDR ADDR. IN RO 




BR 


2$ 


BRANCH BACK TO TEST USER PDR'S 


7$: 


MOV 


#1$,$LPERR 


RESET LJOP ON ERROR POINTER TO 1$ 



LEAVE TEST WITH ALL WRITEABLE BITS IN 
ALL PDR'S = 1 

• 1^**************** **************** jtt'ti,************************** 
•TEST 17 TEST FOR DUAL BYTE ADDRESSING OF KERNEL & USER PAR'S 
« 

• THE FOLLOWING TEST WRITES TO BOTH BYTES OF THE KERNEL & USER 

• PAR'S SEPERATELY TO SEE THAT WRITING TO ONE DOES NOT EFFECT 

« THE OTHER. THIS FURTHER VERIFIES THE OPERATION OF THE PAR/PDR 

» ADDR. MUX AND THE ADDR. DETECTION LOGIC. 
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1967 ;• 

1 968 ; ••••••••••••«*««w4i««««4'>»««<»**«» *•«••«•«• •••••••••••«4i««4>«««»#««« 

1969 022462 000004 TSTl7t SCOPE 
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1970 



1971 


022464 


012700 


172340 


1$: 


MOV 


(fKIPARO.RO 


;LOAD ADDRESS OF FIRST PAR 


INTO RO 


1972 


022470 


012737 


022502 


001110 2$: 


MOV 


#3$,$LPERR 


;SET LOOP ON ERROR POINTER 


TO 3$ 


1973 


022476 


012703 


000010 




MOV 


.#10, R3 


;LOAD LOOP COUNTER TO DO 8 


PAR'S 


1974 


022502 


012701 


177777 


3$: 


MOV 


#-1 ,R1 


JLOAD TEST PATTERN INTO R1 




1975 


022506 


005010 






CLR 


(RO) 


JCLEAR T..E PAR 





CFKTHBO PDP 11/34 MEM MGNT DIAG MACY11 30A(1052) 27-UUN-78 09:33 PAGE 44 

CFKTHB.PII 27-UUN-78 09:27 T17 TEST FOR DUAL BYTE ADDRESSING OF KERNEL & USER PAR'S SEQ 0043 



1976 


022510 


1101 10 








MOVB 


R1 .(RO) 


WRITE 1'S TO THE LOW BYTE OF THE PAR 


1977 


022512 


01 1002 








MOV 


(R0),R2 


READ THE ENTIRE PAR INTO R2 


1978 


022514 


042701 


177400 






BIC 


#177400, R1 


MASK HIGH BYTE & UNUSED BITS OUT OF THE DATA 


1979 


022520 


020102 








CMP 


R1 ,R2 


WAS ONLY THE LOW BYTE WRITTEN TO 


1980 


022522 


001401 








BEQ 


4$ 


BRANCH IF YES 


1981 


022524 


104015 








ERROR 


15 


HIGH BYTE EFFECTED BY WRITING LOW BYTE IN PAR 


1982 
















FOR TIGHTER SCOPE LOOP 


1983 
















REPLACE ERROR CALL WITH 


1984 
















"BR 3$" = 000766 


1985 


022526 


01 2737 


022534 


001110 


4$: 


MOV 


#5$,$LPERR 


SET LOOP ON ERROR POINTER TO 5S 


1986 


022534 


005010 






5$: 


CLR 


(RO) 


CLEAR THE PAR 


1987 


022536 


01 2701 


177777 






MOV 


#-1 ,R1 


LOAD TEST, PATTERN INTO R1 


1983 


022542 


1 10160 


000001 






MOVB 


R1 ,1 (RO) 


WRITE 1'S TO THE HIGH BYTE OF THE PAR 


1 989 


022546 


01 1002 








MOV 


(R0),R2 


READ THE ENTIRE PAR INTO R2 


1990 


022550 


042701 


170377 






BIC 


#170377, R1 


MASK LOW BYTE & UNUSED BITS OUT OF DATA 


1991 


022554 


020102 








CMP 


R1 ,R2 


WAS ONLY THE HIGH BYTE WRITTEN TO? 


1992 


022556 


001401 








BEQ 


6$ 


BRANCH IF YES 


1993 


022560 


104015 








ERROR 


15 


LOW BYTE EFFECTED BY WRITING HIGH BYTE IN PAR 


1994 
















FOR TIGHTER SCOPE LOOP 


1995 
















REPLACE F.RROR CALL WITH 


1996 
















"BR 5" = 000765 


1997 


022562 


062700 


000003 




6$: 


ADD 


#2,R0 


PUT ADDRESS OF NEXT PAR IN RO 


1998 


022566 


077333 








SOB 




BRANCH BACK UNTIL 8 PAR'S TESTED 


1999 


022570 


022700 


177660 






CMP 


#uiPAR7-fa,R0 


HAVE USER PAR'S BEEN TESTED 


2000 


022574 


103003 








BHIS 


7$ 


BRANCH IF YES 


2001 


022576 


012700 


177640 






MOV 


#UIPAR0,R0 


LOAD ADDRESS OF FIRST USER PAR IN RO 


2002 


022602 


000732 








BR 


2$ 


BRANCH BACK TO TEST USER PAR'S 


2003 


022604 


012737 


022464 


001110 


7$: 


MOV 


#1$,$LPERR 


RESET LOOP ON ERROR POINTER TO 1$ 


2004 
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SEQ 0044 



2005 




2006 




2007 




200B 




2009 




2010 




201 1 




2012 




2013 




2014 




2015 




2016 




201 7 


022612 


2018 




2019 


022614 


2020 


022620 


2021 


022626 


2022 


022632 


2023 


022636 


2024 


022640 


2025 


022642 


2026 


022644 


2027 


022650 


2028 


022652 


2029 


022654 


2030 




2031 




2032 




2033 


022656 


2034 


022664 


2035 


022666 


2036 


022672 


2037 


022676 


2038 


022700 


2039 


022704 


2040 


022706 


2041 


022710 


2042 




2043 




2044 




2045 


022712 


2046 


022716 


2047 


022720 


2048 


022724 


2049 


022726 


2050 


022732 


2051 


022734 


2052 





062700 000002 
077333 

022700 177620 
103003 

012700 177600 
000732 

012737 022614 



6$: 



001 t 10 7$! 



J*TEST 20 TEST FOP DUAL BYTE ADDRESSING OF KERNEL & USER PDR'S 

; * 

.* THE FOLLOWING TEST WRITES TO BOTH BYTES OF THE KERNEL & USER 



PDR'S SEPERATELY TO SEE THAT WRITING TO ONE DOES NOT EFFECT 
THE OTHER. THIS FURTHER VERIFIES THE OPERATION OF THE PAR/PDR 
ADDR. MUX AND THE ADDR. DETECTION LOGIC. 



;LOAD ADDRESS OF FIRST PDR INTO RO 
;SET LOOP ON ERROR POINTER TO 3$ 
;LOAD LOOP COUNTER TO DO 8 PDR'S 
;L0AD TEST PATTERN INTO R1 
;CLEAR THE PDR 

;WRITE 1*S TO THE LOW BYTE OF THE PDR 

;READ THE ENTIRE PDR INTO R2 

;MASK HIGH BYTE & UNUSED BITS OUT OF DATA 

;WAS ONLY THE LOW BYTE WRITTEN TO? 

; BRANCH IF YES 

;H1GH BYTE EFFECTED BY WRITING LOW BYTE IN PDR 

;FOR TIG'^TER SCOPE LOOP 
; REPLACE ERROR CALL WITH 
; "BR 3$" = 000766 

;SET LOOP ON ERROR POINTER TO 5S 

jCLEAR THE PDR 

JLOAD TEST PATTERN INTO R1 

JWRITE 1'S TO THE HIGH BYTE OF THE PDR 

;READ THE ENTIRE PDR INTO R2 

;MASK LOW BYTE & UNUSED BITS OUT OF DATA 

;WAS ONLY THE HIGH BYTE WRITTEN TO? 

; BRANCH IF YES 

;LOW BYTE EFFECTED BY WRITING HIGH BYTE IN PDR 

;FOR TIGHTER SCOPE LOOP 

JREPLACE ERROR CALL WITH 

;"BR 5$" = 000765 

;PU7 ADDRESS OF NEXT PDR IN RO 

; BRANCH BACK UNTIL 8 PDR'S TESTED 

;HAVE USER PDR'S BEEN TESTED? 

; BRANCH IF YES 

;LOAD ADDRESS OF FIRST USER PDR IN RO 
{BRANCH BACK TO TEST USER PDR'S 
; RESET LOOP ON ERROR POINTER TO 1$ 



000004 




TST20! 


SCOPE 




01 2700 


172300 


1$: 


MOV 


#KIPDRO,RO 


01 2737 


022632 


001110 2$: 


MOV 


#3$,$LPERR 


01 2703 


000010 




MOV 


#10, R3 


012701 


177777 


3$: 


MOV 


#-1 ,R1 


005010 






CLR 


(RO) 


110110 






MOVB 


R1 ,(R0) 


01 1002 






MOV 


(R0).R2 


042701 


177761 




BIC 


#177761 ,R1 


020102 






CMP 


R1 ,R2 


001401 






BEQ 


4$ 


104015 






ERROR 


15 



01 2737 


022664 


001110 4$: 


MOV 


#5$,$LPERR 


005010 




5$' 


CLR 


(RO) 


012701 


177777 




MOV 


#-1 ,R1 


110160 


000001 




MOVB 


R1 ,1(R0) 


01 1002 






MOV 


(RO) ,R2 


042701 


100377 




BIC 


#100377, R1 


020102 






CMP 


Rl ,R2 


001401 






BEQ 


6$ 


104015 






ERROR 


15 



ADD 

SOB 

CMP 

BHIS 

MOV 

BR 

MOV 



#2,R0 
R3 3$ 

#UIPDR7+2,R0 
7$ 

#UIPDRO,RO 

2$ 

#1$,$LPERR 
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SEQ 0045 



2053 
2054 
2055 
2056 
2057 
2058 
2059 
2060 
2061 
2062 
2063 
2064 
2065 
2066 
2067 
2068 
2069 
2070 
2071 



*TEST at PAR-PDR DUAL ADDRESSING TEST 

* 

* THE FOLLOWING TEST SETS ALL OF THE WRITEABLE BITS TO 1 

* IN THE SIXTEEN (16) PAR'S AND PDR'S USING THE "SETREG" 

* SUBROUTINE AND THEN CLEARS JUST ;NE OF THEM. THE "CMPREG" 

* SUBROUTINE IS USED TO READ ALL OF THE PAR'S AND PDR'S TO SEE 

* THAT ONLY ONE REGISTER WAS CLEARED IN RESPONSE TO THAT ONE 

* PAR OR PDR ADDRESS. THE "CMPREG" SUBROUTINE REPORTS THE 

« ADDRESS OF ANY REGISTER WHOSE BITS DID NOT REMAIN SET WHEN 

* ANOTHER REGISTER WAS CLEARED. 



THE PAR AND PDR CHIPS, 
LOGIC ARE CHECKED. 



PAR/PDR ADDR. MUX, AND ADDR. DETECTION 



022742 000004 



TST21: SCOPE 



2072 


022744 


012737 


022762 


001110 


1$: 


MOV 


#2$,$LPERR 


2073 


022752 


012703 


000010 






MOV 


#10, R3 


2074 


022756 


01 2700 


172300 






MOV 


#KIPDR0,R0 


2075 


022762 


01 2706 


001 100 




3S: 


MOV 


#KERSTK,KSP 


2076 


022766 


004737 


036070 






USR 


PC, SETREG 


2077 


022772 


005010 








CLR 


(RO) 


2078 


022774 


004737 


036162 






USR 


PC, CMPREG 


2079 


023000 


062700 


000002 






ADD 


#2,R0 


2080 


023004 


077312 








SOB 


R3,2$ 


2081 


023006 


012737 


023024 


001110 




MOV 


#3$,$LPERR 


2082 


023014 


01 2703 


000010 






MOV 


#10, R3 


2083 


023020 


01 2700 


172340 






MOV 


#KIPAR0,R0 


2084 


023024 


012706 


001 100 




3$: 


MOV 


#KERSTK,KSP 


2085 


023030 


004737 


036070 






USR 


PC, SETREG 


2086 


023034 


005010 








CLR 


(RO) 


2087 


023036 


004737 


036162 






JSR 


PC, CMPREG 


2088 


023042 


062700 


000002 






ADD 


#2,R0 


2089 


023046 


077312 








SOB 


R3,3$ 


2090 


023050 


012737 


023066 


001113 




MOV 


#4$,$LPERR 


2091 


023056 


01 2703 


000010 






MOV 


#10, R3 


2092 


023062 


01 2700 


177600 






MOV 


#UIPDR0,R0 


2093 


023066 


01 2706 


001100 




4$: 


MOV 


#KERSTK,KSP 


2094 


023072 


004737 


036070 






JSR 


PC, SETREG 


2095 


023076 


005010 








CLR 


(RO) 


2096 


023100 


004737 


036162 






JSR 


PC, CMPREG 


2097 


023104 


062700 


000002 






ADD 


#2,R0 


2098 


0231 10 


077312 








SOB 


R3,4$ 


2099 


0231 12 


01 2737 


023130 


001110 




MOV 


#5$,$LPERR 


2100 


023120 


012703 


000010 






MOV 


#10, R3 


2101 


023124 


012700 


177640 






MOV 


#UIPARO,RO 


2102 


023130 


012706 


001100 




5$! 


MOV 


#KERSTK,KSP 


2103 


023134 


004737 


036070 






JSR 


PC, SETREG 


2104 


023140 


005010 








CLR 


(RO) 


2105 


023142 


004''37 


036162 






JSR 


PC.CMPREQ 



SET LOOP ON ERROR POINTER 2$ 

LOAD LOOP COUNTER WITH AN 8 

LOAD ADDRESS OF FIRST KERNEL PDR AND RO 

SETUP STACK POINTER 

SET ALL BITS IN ALL PAR'S IN PDR'S 

CLEAR ONE OF THE KERNEL PDR'S 

SEE IF OTHER PAR/PDR'S WERE EFFECTED 

FORM ADDRESS OF NEXT KERNEL PDR TO CLEAR 

LOOP TO 2$ UNTIL ALL KERNEL PDR'S CHECKED 

SET LOOP ON ERROR POINTER TO 3$ 

LOAD LOOP COUNTER WITH AN 8 

LOAD ADDRESS OF FIRST KERNEL PAR IN RO 

SETUP STACK POINTER 

SET ALL BITS IN ALL PAR'S AND PDR'S 

CLEAR ONE OF THE KERNEL PAR'S 

SEE IF OTHER PAR/PDR'S WERE EFFECTED 

FORM ADDRESS OF NEXT KERNEL PAR TO CLEAR 

LOOP TO 3$ UNTIL ALL KERNEL PAR'S CHECKED 

SET LOOP ON ERROR POINTER TO 4$ 

LOAD LOOP COUNTER WITH AN 8 

LOAD ADDRESS Of FIRST USER PDR IN RO 

SETUP STACK POINTER 

SET ALL BITS IN ALL PAR'S AND PDR'S 

CLEAR ONE OF THE USER PDR'S 

SEE IF OTHER PAR/PDR'S WERE EFFECTED 

FORM ADDRESS OF NEXT USER PDR TO CLEAR 

LOOP TO 4$ UNTIL ALL USER PDR'S CHECKED 

SET LOOP ON ERROR POINTER TO 5$ 

LOAD LOOP COUNTER WITH AN 8 

LOAD ADDRESS OF FIRST USER PAR IN RO 

SETUP STACK POINTER 

SET ALL BITS IN ALL PAR'S AND PDR'S 

CLEAR ONE OF THE USER PAR'S 

SEE IF OTHER PAR/PDR'S WERE EFFECTED 
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2106 


023146 


062700 


000002 


21 07 


023152 


077312 




21 08 


0231 54 


012737 


022744 


21 09 








2110 








2111 








21 12 








2113 








21 14 








21 15 








21 16 








2117 








2118 








21 19 








2120 


0231 62 


000004 




2121 








2122 








2123 


023164 


004737 


036070 


2124 


0231 70 


000005 




2125 


0231 72 


Oi 2700 


172300 


2126 


0231 76 


01 2704 


000010 


2127 


023202 


01 1001 




2128 


023204 


022701 


077416 


2129 


023210 


001401 




2130 


023212 


104055 




2131 








2132 








2133 








2134 


023214 


062700 


000002 


2135 


023220 


077410 




2136 


023222 


012700 


172340 


2137 


023226 


01 2704 


000010 


2138 


023232 


01 1001 




2139 


023234 


022.01 


007777 


2140 


023240 


001401 




2141 


023242 


104055 




2142 








2143 








2144 








2145 


023244 


062700 


000002 


2146 


023250 


077410 




2147 


023252 


01 2700 


177600 


2148 


023256 


01 2704 


000010 


2149 


023262 


01 1001 




2150 


023264 


022701 


077416 


2151 


023270 


001401 




2152 


023272 


104055 




2153 








2154 








2155 








2156 


023274 


062700 


000002 


2157 


023300 


077410 




2158 








2159 


023302 


012700 


177640 


2160 


023306 


012704 


000010 


2161 


023312 


01 1001 





*TEST 



♦ *«*> 
TST2a: 



ADD 
SOB 
MOV 



22 



#2,R0 ;FORM ADDRESS OF NEXT USER PAR TO CLEAR 

R3,5$ ;LOOP TO 5$ UNTIL ALL USER PAR'S CHECKED 

rfSilS.SLPERR ;SET LOOP ON ERROR POINTER TO 1$ 



TEST THAT PAR-PDR ' S NOT AFFECTED BY RESET 



THIS TEST CHECKS TO SEE THAT THE KERNEL OR USER PAR/PDR'S ARE 
NOT AFFECTED BY THE EXECUTION OF A "RESET" INSTRUCTION. THE 
"SETREG" SUBROUTINE IS USED TO SET ALL WRITEABLE BITS TO A "1" IN 
THE PAR/PDR'S. THEN THEY ARE READ TO SEE THAT THEY REMAINED 
UNCHANGED 



SCOPE 



3S: 



4S! 



7$i 



JSR 

RESET 

MOV 

MOV 

MOV 

CMP 

BEQ 

ERROR 



ADD 
SOB 
MOV 
MOV 
MOV 
CMP 
BEQ 
ERROR 



ADD 
SOB 
MOV 
MOV 
MOV 
CMP 
BEQ 
ERROR 



ADD 
SOB 

MOV 
MOV 
MOV 



PC.SETREQ 

#KIPDRO,RO 

#10, R4 

(R0),R1 

#77416, R1 

3$ 

55 



#2,R0 
R4,2$ 

#KIPARO,RO 

#10, R4 

(R0),R1 

#7777, R1 

5$ 

55 



#2,R0 
R4,4$ 

#UIPDRO,RO 
#10, R4 
tRO) ,R1 
#77416, R1 
7$ 
55 



#2,R0 
R4.6$ 

#UIPAR0,R0 
#10, R4 
(R0),R1 



SET ALL BITS IN ALL PAR'S AND PDR'S 
ISSUE AN "INIT" BY EXECUTING A RESET 
LOAD ADDRESS OF FIRST KERNEL PDR IN RO 
LOAD LOOP COUNTER WITH AN B 
READ A KERNEL PDR INTO R1 
ARE ALL THE BITS STILL SET? 
BRANCH IF YES 

KERNEL PDR AFFECTED BY A RESET 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 2$" « 000773 

FORM ADDRESS OF NEXT KERNEL PDR 

LOOP TO 2$ UNTIL ALL KERNEL PDR'S CHECKED 

LOAD ADDRESS OF FIRST KERNEL PAR IN RO 

LOAD LOOP COUNTER WITH AN 8 

READ A KERNEL PAR INTO R1 

ARE ALL THE BITS STILL SET? 

BRANCH IF YES 

KERNEL PAR AFFECTED BY A RESET 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 4$" = 000773 

FORM ADDRESS OF NEXT KERNEL PAR 

LOOP TO 4i UNTIL ALL KERNEL PAR'S CHECKED 

LOAD ADDRESS OF FIRST USER PDR IN RO 

LOAD LOOP COUNTER WITH AN 8 

READ A USER PDR INTO R1 

ARE ALL THE BITS STILL SET? 

BRANCH F YES 

USER PDR AFFECTED BY A RESET 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 6$" - 000773 

FORM ADDRESS OF NEXT USER PDR 

LOOP TO 6$ UNTIL ALL USER PDR'S CHECKED 

LOAD ADDRESS OF FIRST USER PAR IN RO 
LOAD LOOP COUNTER WITH AN 8 
READ A USER PAR INTO R1 
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SEQ 0047 



2162 
2163 
2164 
2165 
2166 
2167 
2168 
2169 
2170 
2171 
2172 
2173 
2174 
2175 
2176 
2177 
2178 
2179 
2180 
2181 
2182 
2183 
2184 
2185 
2186 
2187 
2188 
2189 
2190 
2191 
2192 
2193 
2194 
2195 
2196 
2197 
2198 
2199 
2200 
2201 
2202 
2203 
2204 
2205 
2206 
2207 
2208 
2209 
2210 
221 1 
2212 
2213 
2214 
2215 
2216 
2217 



023314 022701 007777 
023320 001401 
023322 104055 



023324 062700 000002 
023330 077410 



CMP 
BEQ 
ERROR 



ADD 
SOB 



#7777, R1 

9$ 

55 



#2,R0 
R4,8$ 



;ARE ALL THE BITS STILL SET? 
; BRANCH IF YES 

JUSER PAR AFFECTED BY A RESET 

;FOR TIGHTER SCOPE LOOP 

•.REPLACE ERROR CALL WITH 

; "BR 8$" « 000773 

;FORM ADDRESS OF NEXT USER PAR 

;LOOP TO 8$ UNTIL ALL USER PAR'S CHECKED 



;***«< 

• TEST 



23 



INSTRUCTION FETCH NOT RELOCATED IN MAINT. 



MODE 



THIS TEf CHECKS TO SEE THAT WHEN MEMORY MANAGEMENT IS IN 
MAINTENANCE MODE (DESTINATION-ONLY-RELOCATION), AN INSTRUCTION 
FETCH IS NOT RELOCATED AND A RES^^T CLEARS THE MAINTENANCE BIT 
(BIT 08) IN SRO. IF THE "FETCH" IS RELOCATED, A PG. LENGTH ABORT 
SHOULD OCCUR, CAUSING A HALT SINCE TRAP CATCHER IS PLACED IN VECTOR 250 



A HALT MAY OCCUR IF MAINT. MODE NOT DISABLED BY RESET 



i«iti4i4i>|i4i**«i»*4ri»itii«i*4ii|i*4<4ri|i**4'4<4i4'*4ri»«4> 



023332 


000004 






TST23: 


SCOPE 




023334 


004737 


036002 




1$: 


JSR 


PC, TOFF 


023340 


012700 


172300 






MOV 


#KIPDRO,RO 


023344 


01 2704 


000010 






MOV 


#10, R4 


023350 


005020 






a$: 


CLR 


(R0) + 


023352 


077402 








SOB 


R4,2$ 


023354 


012737 


000252 


000250 




MOV 


#MMVEC+2,MMVE 


023362 


005037 


000252 






CLR 


MMVEC+2 


023366 


01 2737 


001006 


172300 




MOV 


#1006,KIPDR0 


023374 


01 2737 


023402 


001 110 




MOV 


#3$,$LPERR 


023402 


01 2737 


000400 


177572 


3$: 


MOV 


#BIT8,SR0 


023410 


000005 








RESET 




023412 


032737 


000400 


177572 




BIT 


#BIT8,SR0 


023420 


001403 








BEQ 


4$ 


023422 


005037 


177572 






CLR 


SRO 


023426 


104061 








ERROR 


61 


023430 


012706 


001100 




4$: 


MOV 


#KERSTK,KSP 


023434 


005037 


177572 






CLR 


SRO 



TURN T-BIT TRAPPING OFF FOR THIS TEST 
LOAD ADDRESS OF FIRST KERNEL PDR INTO RO 
LOAD LOOP COUNTER WITH AN 8 
CLEAR PDR - MAPPING PAGE NON-RES, BLKS. 
LOOP TO 2$ UNTIL ALL KERNEL PDR'S CLEARED 
LOAD TRAP CATCHER INTO MEM MGM. VECTOR 

A HALT WILL OCCUR IF RESET FAILS 
TO DISABLE DEST.-ONLY RELOCATION 
MAP KERNEL PG R/W, 3 BLOCKS LONG. 
SET LOOP ON ERROR POINTER TO 3$ 
TURN ON DEST-ONLY-RELOCATION 

SHOULD CLEAR MAINT. BIT - WILL ABORT IF RELOCATED 
WAS MAINT. BIT (BIT 8) OF SRO CLEARED? 

BRANCH IF YES 

CLEAR SRO SO ERROR CAN BE REPORTED 

MAINT. MODE NOT DISABLED BY A RESET 

FOR A TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 3$" » 000765 

RESTORE STACK POINTER 

BE SURE SRO IS CLEAR 
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SE9 004S 



2218 
2219 
2220 
2221 
2222 
2223 
2224 
2225 
2226 
2227 
2228 
2229 
2230 
2231 
2232 
2233 
2234 
2235 
2236 
2237 
2238 
2239 
2240 
2241 
2242 
2243 
2244 
2245 
2246 
2247 
2248 
2249 
2250 
2251 
2252 
2253 
2254 
2255 
2255 
2257 
2258 
2259 
2260 
2261 
2262 
2263 
2264 
22S5 
2266 
2267 
2268 
2269 
2270 
2271 
2272 
2273 



023440 012737 002400 000250 

023446 012737 000340 000252 

023454 012737 023334 001110 

023462 004737 036036 



MOV 
MOV 
MOV 
USR 



*MGMERR,MMVEC 
#340,MMVEC+2 

«1$,$LPERR 
HC.TON 



{RESTORE MEM. MGMT. TRAP VECTOR 
•.RESTORE MEM. MGMT VECTOR+2 
•.RESET LOOP ON ERROR POINTER TO 1$ 
;TURN T-BIT TRAPPING BACK ON 



J**«**l|r>iiltl«4i««**«4l*«l|l4<*l|l**>t'**l)>*4>««*4>*«*«*'*i»*4r***<»«**************« 

*TEST 24 TEST THAT SOURCE NOT RELOCATED IN MAINTENANCE MODE 

* THIS TEST CHECKS TO SEE THAT WHEN MEMORY MANAGEMENT IS IN 

* MAINTENANCE MODE, THE SOURCE IS NOT RELOCATED. ONLY THE 

* DESTINATION IS RELOCATED. KERNEL PAR'S 3 5 4 ARE MAPPED TO 

* PHYSICAL ADDRESS 60000-77776. PDR4 IS SET TO ALLOW FULL READ/WRITE 

* BUT PDR3 IS CLEAR ALLOWING TO ACCESS. VIRTUAL ADDRESSES REFERENCING 

* PAR/POR'S 4 & 3 ARE USED IN AS DESTINATION AND SOURCE RESPECTIVELY. 

* IF THE SOURCE IS RELOCATED IN MAINTENANCE A MEM. MGMT. TRAP WILL 

* OCCUR AND THE ERROR WILL BE REPORTED. KERNEL PG. 7 IS MAPPED R/W. 



> « Id « $ ^ « 



« « Ik * « Hi « * )«• f 4> 



023466 


000004 






TST24! 


SCOPE 




023470 


004737 


036002 




1$: 


USR 


PC. TOFF 


023474 


01 2737 


023564 


001 110 




MOV 


*2$,$LPERR 


023502 


01 2737 


000600 


172343 




MOV 


#600,KIPAR3 


023510 


01 2737 


000600 


172350 




MOV 


#600,KIPAR4 


023516 


012737 


007600 


172356 




MOV 


#7600,KIPAR7 


023524 


005037 


172306 






CLR 


KIPDR3 


023530 


01 2737 


077406 


172310 




MOV 


#77406, KIPDR4 


023536 


01 2737 


077406 


172316 




MOV 


#77406, KIPDR7 


023544 


01 2737 


023644 


000250 




MOV 


#4$,MMVEC 


023552 


01 2737 


000377 


060000 




MOV 


#377, ©#60000 


023560 


01 2700 


177777 






MOV 


#-1 ,R0 


023564 


052737 


000400 


177572 


2$: 


BIS 


#BIT8,SR0 


023572 


113737 


060000 


100001 




MOVB 


@#60000,f»#l00G 


023600 


000005 








RESET 




023602 


01 3701 


060000 






MOV 


@#60000,R1 


023606 


020001 








CMP 


R0,R1 


023610 


001401 








BEQ 


3$ 


023612 


104062 








ERROR 


62 


023614 


012737 


002400 


000250 


3$: 


MOV 


#MGMERR,MMVEC 


023622 


012737 


077406 


172306 




MOV 


#77406, KIPDR3 


023630 


012737 


023470 


001110 




MOV 


#1$*$LPERR 



;MAP KERNAL PAGE 
;MAP KERNAL PAGE 
;MAP KERNAL PAGE 
;MAP KERNAL PAGE 
;MAP KERNAL PAGE 



;TURN OFF T-BIT TRAPPING FOR THIS TEST 
;SET LOOP ON ERROR POINTER TO 2$ 
■.MAP KERNAL PAGE 3 TO 12-16K 
4 TO 12-16K 
7 TO THE I/O PAGE 

3 "NO ACCESS" 

4 R/W. 128 BLKS 
7 R/W, 128 BLKS 

;SET M.M. VtCTUK TO 4$ IN CASE OF ABORT 
;LOAD ALL 1'S IN LOW BYTE OF TEST LOG. 
JLOAD EXPECTED CONTENTS OF TEST LOC. IN RO 
;TURN ON DEST . -ONLY-RELOCATION 
l;LOAD HI BYTE OF TEST LOC. -ABORT IF SOURCE RELOCATED 
JTURN OFF DEST. -ONLY-RELOCATION 
JREAD CONTENTS OF TEST LOC. 
;WAS TEST LOCATION LOADED PROPERLY? 
; BRANCH IF YES 

•,TEST LOC. NOT LOADED - INST. WAS AK3RTED 

;WHEN SOURCE WAS RELOCATED 

;FOR TIGHTER SCOPE LOOP REPLACE 

; ERROR CALL WITH 

;"BR 2$" » 000764 

; RESTORE MEM. MGMT. VECTOR 

;MAP KERNAL PAGE 3 R/W. 128 BLKS 

{RESET LOOP ON ERROR POINTER TO IS 



CFKTHBO PDP 11/34 MEM MGNT DIAG MACY11 30A(1052) 
CFKTHB.P1 1 



27-JUN-78 09:33 PAGE 50 



2274 
2275 
2276 
2277 
2278 
2279 
2280 
2281 
2282 
2283 
2284 
2285 
2286 
2287 
2288 
2289 
2290 
2291 
2292 
2293 
2294 
2295 
2296 
2297 
2298 
2299 
2300 
2301 
2302 
2303 
2304 
2305 
2306 
2307 
2308 
2309 
2310 
231 1 
2312 
2313 
2314 
2315 
2316 
2317 
2318 
2319 
2320 
2321 
2322 
2323 
2324 
2325 
2326 
2327 
2328 
2329 



023636 
023642 



023644 
023652 
023660 
023666 
023672 
023676 
023702 
023710 



023712 
023716 
023722 



r-JUN-78 


09:27 




T24 


TEST 


THAT SOURCE NOT 


RELOCATED IN MAINTENANCE MODE 




004737 


036036 






USR 


PC, TON 


;TURN T-BIT TRAPPING BACK ON 




000430 








BR 


TST25 


; ;SKIP TO NEXT TEST 










t * 


IF THE PROGRAM TRIES TO 


RELOCATE THE SOURCE, IT SHOULD TRAP 


TO 4$ 


042737 


000400 


177572 


4S: 


BIC 


#BIT8,SR0 


•,TURN OFF DEST .-ONLY-RELOCATION 


THRU PAR/PDR 


013737 


177572 


001366 




MOV 


SRO.WASSRO 


;SAVE REST OF SRO CONTENTS 


013737 


177576 


001370 




MOV 


SR2.WASSR2 


;SAVE CONTENTS OF SR2 




010637 


001354 






MOV 


SP.WASRB 


;SAVE VALUE OF THE STACK POINTER 


012637 


001356 






MOV 


(SP)+.TRAPPC 


{SAVE PC OF TRAP 




012537 


001360 






MOV 


(SP)+,TRAPPS 


{SAVE PSW OF TRAP 




042737 


160000 


177572 




BIC 


#1 60000, SRO 


{CLEAR ERROR BITS IN SRI 




104063 








ERROR 


63 


{SOURCE APPARENTLY RELOCATED IN 


MAINT. MODE 



SEO 0049 



01 3746 
013746 
000002 



023724 000004 

023726 012700 

023732 005001 

023734 012702 

023740 010120 

023742 062701 

023746 077204 



001360 
001356 



MOV TRAPPS,-(SP) 
MOV TRAPPC,-(SP) 
RTI 



{FOR TIGHTER SCOPE LOOP 
{REPLACE ERROR CALL WITH A 
{"NOP" a 000240 

{PUT PSW OF TRAP BACK ON THE STACK 
{PUT PC OF TRAP BACK ON THE STACK 
{RETURN TO TEST 



RELOCATION & ADDER TEST (NO CARRIES) 

THE FOLLOWING TEST SETS UP THE KERNEL PAR'S AND PDR ' S 

FOR THE REST OF THE PROGRAM. IT THEN USES DIFFERENT 

VIRTUAL ADDRESSES AND DIFFERENT VALUES FOR KERNEL PAR 4 

TO PUT DIFFERENT PATTERNS AT THE INPUTS OF THE THREE 

MEMORY MANAGEMENT ADDER CHIPS. THE VALUES ARE SUCH 

THAT NO CARRIES ARE GENERATED OUT OF ANY OF THE ADDER CHIPS. 

THE METHOD USED TO SEE THAT THE RIGHT PHYSICAL BUS ADDRESS 
IS FORMED BY THE ADDERS IS TO WRITE A PATTERN TO VIRTUAL 
LOCATION WITH MEMORY MGMT. IN THE MAINTENANCE MODE. AND 
THEN READ THAT LOCATION USING THE PHYSICAL ADDRESS THAT SHOULD 
HAVE BEEN FORMED TO SEE IF THE TEST PATTERN GOT THEIR. 



4t(i****4i4i**i|i*4i*4>4i<ti4>it<4iiti*4i***«««*4ntr 

TST25! SCOPE 



MOV 
CLR 
MOV 
MOV 
ADD 
SOB 



#KIPARO,RO 
R1 

#7,R2 
R1 ,(R0)4- 
#200, R1 
R2,2$ 



{LOAD ADDRESS OF FIRST KERNEL PAR IN RO 
{CLEAR R1 

{LOAD LOOP COUNTER WITH A 7 

{MAP KERNEL PAR'S TO PAGES 0-6 (4K EACH) 

{LOOP UNTIL KIPARO - KZPAR6 ARE LOADED 
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SEO 0050 



2330 
2331 
2332 
2333 
2334 
2335 
2336 
2337 
2338 
2339 
2340 
2341 
2342 
2343 
2344 
2345 
2346 
2347 
2348 
2349 
2350 
2351 
2352 
2353 
2354 
2355 
2356 
2357 
2358 
2359 
2360 
2361 



023750 


012710 


007600 






MOV 


^'7600, ( RO) 


;MAP KIPAR7 TO THE I/O PAGE 


023754 


01 2700 


1 72300 






MOV 


#KIPDRO , RO 


; LOAD ADDRESS OF FIRST KERNEL PDR IN RO 


023760 


01 2701 


077406 






MOV 


#77406 , R1 


; LOAD PDR DATA INTO R1 


023764 


01 2702 


000010 






MOV 


#10, R2 


; LOAD LOOP COUNTER WITH AN 8 


023770 


010120 






3$: 


MOV 


R1 , (R0)+ 


;MAP ALL 8 PAGES 128 BLOCKS, UPWARD 


023772 


077202 








SOB 


R2,3$ 


} EXPANDABLE, READ/WRITE 


023774 


01 2737 


023774 


001 1 10 


4$: 


MOV 


#4$ ,$LPERR 


;SET LOOP ON ERROR POINTER TO 4$ 


024002 


01 2700 


067776 






MOV 


#67776 , RO 


; LOAD PHYSICAL ADDR. PBA INTO RO 


024006 


01 2701 


107776 






MOV 


#107776, R1 


; LOAD VIRTUAL ADDR. VBA INTO R1 


024012 


01 2702 


125250 






MOV 


#125250 , R2 


; LOAD TEST PATTERN INTO R2 


024016 


01 2704 


000600 






MOV 


#600, R4 ; LOAD 


R4 WITH PAR VALUE 














OA U 1 DA OA 


,l.UAU rvtKINtU HAN *♦ 13113 vil.uU^ 


024026 


01 1 .37 


001176 






MOV 


(RO) .STMPO 


;SAVE CONTENTS AT TEST LOCATION 


024032 


052737 


000400 


177573 




BIS 


#BIT8,SR0 


JTURN ON "DESTINATION-ONLY-RELOCATION" 


02-3040 


01 021 1 








MOV 


R2,(R1 ) 


;LOAD 125250 USING ADDER CHIPS ( PAR4 + VIRT 


024042 


01 1003 








MOV 


(RO) ,R3 


;READ 125250 BACK WITHOUT USING MEM. MGMT. 


024044 


000005 








RESET 




;TURN OFF MEMORY MGMT. MA I NT. MODE 


024046 


01 3710 


001 176 






MOV 


STMPO, (RO) 


; RESTORE ORIGINAL CONTENTS TO TEST LOC. 


024052 


020203 








CMP 


R2,R3 


;WAS SAME PATTERN READ BACK THAT WAS 
















; WRITTEN USING " DEST-ONLY-RELOC . " ? 


024054 


001405 








BEQ 


5$ 


; BRANCH IF YES 


024056 


010137 


001402 






MOV 


R1 ,VIRT1 


;SAVE VIRTUAL ADDR. TO FORM PHYS. ADDR 


024062 


004737 


0363S4 






JSR 


•■•CFORMPA 


;G0 FORM PHYSICAL ADDRESS FOR TYPING 


024066 


104017 








ERROR 


17 


JTEST LOCATION DID NOT HAVE PATTERN 



2362 


024070 








55! 






2363 


024070 


01 2737 


024070 


001110 


6$: 


MOV 


#6$,$LPERR 


2364 


024076 


01 2700 


067776 






MOV 


#67776, RO 


2365 


0241 02 


01 2701 


102576 






MOV 


#102576, R1 


2366 


024106 


012702 


125251 






MOV 


#125251 ,R2 


2367 


0241 12 


01 2704 


000652 






MOV 


#652, R4 ;LQAD 


2368 


0241 16 


01 0437 


172350 






MOV 


R4,KIPAR4 


2369 


0241 22 


01 1037 


001 176 






MOV 


(RO) , STMPO 


2370 


0241 26 


052737 


000400 


177572 




BIS 


#BIT8,SR0 


2371 


024134 


01 021 1 








MOV 


R2, (R1 ) 


2372 


024136 


01 1003 








MOV 


(RO) ,R3 


2373 


024140 


000005 








RESET 




2374 


024142 


01 3710 


C01176 






MOV 


STMPO, (RO) 


2375 


024146 


020203 








CMP 


R2,R3 


2376 
















2377 


024150 


001405 








BEQ 


7$ 


2378 


024152 


010137 


001402 






MOV 


R1 .VIRTI 


2379 


024156 


004737 


036354 






USR 


PC.FORMPA 


2380 


024162 


104017 








ERROR 


17 



2381 
2382 
2383 
2384 
2385 



THAT SHOULD HAVE BEEN WRITTEN TO IT. 

APPARENTLY PHYSICAL ADDR. WAS 
FORMED WRONG BY ADDERS USING 
THE VIRTUAL ADDR. AND KIPAR4 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 4$" = 000742 

SET LOOP ON ERROR POINTER TO 6$ 
LOAD PHYSICAL ADDR. PBA INTO RO 
LOAD VIRTUAL ADDR. VBA INTO R1 
LOAD TEST PATTERN INTO R2 
WITH PAR VALUE 

LOAD KERNEL PAR 4 BITS <1i:00> 

SAVE CONTENTS AT TEST LOCATION 

TURN ON "DESTINATION-ONLY-RELOCATION" 

LOAD 125251 USING ADDER CHIPS ( PAR4 + VIRT ADDR.) 

READ 125251 BACK WITHOUT USING MEM. MGMT. 

TURN OFF MEMORY MGMT. MAINT. MODE 

RESTORE ORIGINAL CONTENTS TO TEST LOC. 

WAS SAME PATTERN READ BACK THAT WAS 

WRITTEN USING "DEST-ONLY-RELOC. " ? 

BRANCH IF YES 

SAVE VIRTUAL ADDR. TO FORM PHYS. ADDR 
GO FORM PHYSICAL ADDRESS FOR TYPING 
TEST LOCATION DID NOT HAVE PATTERN 
THAT SHOULD HAVE BEEN WRITTEN TO IT. 
APPARENTLY PHYSICAL ADDR. WAS 
FORMED WRONG BY ADDERS USING 
THE VIRTUAL ADDR. AND KIPAR4 
FOR TIGHTER SCOPE LOOP 
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SEO 00S1 



2386 
2387 



2388 


024164 








7$: 




2389 


024164 


01 2737 


024164 


001110 


8$: 


MOV 


2390 


024172 


01 2700 


067776 






MOV 


2391 


0241 76 


01 2701 


105276 






MOV 


2392 


024202 


01 2702 


125252 






MOV 


2393 


024206 


01 2704 


000625 






MOV 


2394 


024212 


01 0437 


172350 






MOV 


2395 


024216 


01 1037 


001 176 






MOV 


2396 


024222 


052737 


000400 


177572 




BIS 


2397 


024230 


01 021 1 








MOV 


2398 


024232 


01 1003 








MOV 


2399 


024234 


000005 








RESET 


2400 


024236 


01 3710 


001 176 






MOV 


2401 


024242 


020203 








CMP 


2402 














2403 


024244 


001405 








BEQ 


2404 


024246 


01 0137 


001402 






MOV 


2405 


024252 


004737 


036354 






JSR 


2406 


024256 


104017 








ERROR 



2407 
2408 
2409 
2410 
241 1 
2412 
2413 
2414 
2415 
2416 
2417 
2418 
2419 
2420 
2421 
2422 
2423 
2424 
2425 
2426 
2427 
2428 
2429 
2430 
2431 
2432 
2433 
2434 
2435 
2436 
2437 
2438 
2439 
2440 
2441 



.»8$,$LPERR 
#67776, RO 
#105276, R1 
#125252, R2 
#625, R4 ;L0AD 
R4,KIPAR4 
(RO) , STMPO 
#BIT8,SR0 
R2,(R1 ) 
(RO) ,R3 

STMPO, (RO) 
R2,R3 

9$ 

R1 , VIRTI 

PCtFORMPA 

17 



{REPLACE ERROR CALL WITH 
; "BR 6$" = 000742 

;SET LOOP ON ERROR POINTER TO 8$ 
; LOAD PHYSICAL ADDR. PBA INTO RO 
;LOAD V1..TUAL ADDR. VBA INTO R1 
JLOAD TEST PATTERN INTO R2 
R4 WITH PAR VALUE 

LOAD KERNEL PAR 4 BITS <11:00> 
SAVE CONVENTS AT TEST LOCATION 
TURN ON "DESTINATION-ONLY-RELOCATION" 
LOAD 125252 USING ADDER CHIPS ( PAR4 + VIRT ADDR.) 
READ 125252 BACK WITHOUT USING MEM. MGMT. 
TURN OFF MEMORY MGMT. MAINT. MODE 
RESTORE ORIGINAL CONTENTS TO TEST LOC. 
WAS SAME PATTERN READ BACK THAT WAS 
WRITTEN USING "DEST-ONLY-RELOC"? 
BRANCH IF YES 

SAVE VIRTUAL ADDR. TO FORM PHYS. ADDR 
GO FORM PHYSICAL ADDRESS FOR TYPING 
TEST LOCATION DID NOT HAVE PATTERN 
THAT SHOULD HAVE BEEN WRITTEN TO IT. 
APPARENTLY PHYSICAL ADDR. WAS 
FORMED WRONG BY ADDERS USING 
THE VIRTUAL ADDR. AND KIPAR4 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 8$" = 000742 



024260 








9S: 








024260 


01 2737 


024260 


001110 


10$: 


MOV 


#10$,$LPERR 


SET LOOP ON ERROR POINTER TO 10$ 


024266 


01 2700 


177776 






MOV 


#PSW,RO 


LOAD PHYS. ADDR. OF PSW INTO RO 


024272 


01 2701 


100076 






MOV 


#100076, R1 


LOAD VIRTUAL ADDR. FOR PSW INTO R1 


024276 


01 2702 


030340 






MOV 


#030340, R2 


LOAD DATA FOR PSW IN R2 


024302 


012704 


007777 






MOV 


#7777, R4 


LOAD R4 WITH PAR VALUE 


024306 


010437 


172350 






MOV 


R4,KIPAR4 


LOAD KERNEL PAR 4 BITS <11:00> 


024312 


005010 








CLR 


(RO) 


CLEAR THE PSW 


024314 


052737 


000400 


177572 




BIS 


#BIT8,SR0 


TURN ON "DESTINATION-ONLY-RELOCATION" 


024322 


01 021 1 








MOV 


R2,(R1 ) 


LOAD PSW USING ADDER CHIPS (PAR4 + VIRT ADDR.) 


024324 


01 1003 








MOV 


(RO) ,R3 


READ PSW BACK WITHOUT USING MEM. MGMT. 


024326 


000005 








RESET 




TURN OFF MEM. MGMT MAINT . MODE 


024330 


005010 








CLR 


(RO) 


CLEAR THE PSW 


024332 


042703 


000037 






BIC 


#37, R3 


MASK T-BIT & CC BITS OUT OF DATA READ 


024336 


020203 








CMP 


R2,R3 


WAS PSW WRITTEN WHILE IN MAINT. MODE? 


024340 


001405 








BEQ 


11$ 


BRANCH IF YES 


024342 


010137 


001402 






MOV 


R1 , VIRTI 


SAVE VIRTUAL ADDR. TO FORM PHYS. ADDR 


024346 


004737 


036354 






vJSR 


PCFORMPA 


GO FORM PHYSICAL ADDR. FOR TYPING 


024352 


104017 








ERROR 


17 


PSW DID NOT HAVE DATA THAT IT SHOULD HAVE, 



024354 01 2737 024354 001110 11$: 
024362 012700 177776 



MOV 

my 



#1 1$,$LPERR 

#PSM,RO 



APPARENTLY PHYS. ADDR. OF PSW WAS 
NOT FORMED BY ADDERS USING THE 
VIRTUAL ADDR. AND KIPAR4 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 10$" a 000742 

SET LOOP ON ERROR POINTER TO 11$ 
LOAD PHYS. ADDR. OF PSW INTO RO 
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SEO 0093 



2442 
2443 
2444 
2445 
2446 
2447 
2448 
2449 
2450 
2451 
2452 
2453 
2454 
2455 
2456 
2457 
2458 
2459 
2460 
2451 
2462 
2463 
2464 
2465 
2466 
2467 
2468 
2469 
2470 
2471 
2472 
2473 
2474 
2475 
2476 
2477 
2478 
2479 
2480 



024366 
024372 
024376 
024402 
024406 
024414 
024416 
024420 
024422 
024424 
024430 
024432 
024434 
024440 
024444 



01 2701 
01 2702 
01 2704 
01 0437 
052737 
01 021 1 
01 1003 
000005 
005010 
042703 
020203 
001405 
010137 
004737 
104017 



1 17776 
030240 
007600 
172350 
000400 



001402 
036354 



MOV 

MOV 

MOV 

MOV 

BIS 

MOV 

MOV 

RESET 

CLR 

BIC 

CMP 

BEQ 

MOV 

USR 

ERROR 



024446 012737 023736 001110 12$: 



#117776, R1 

#030240, R2 

#7600, R4 

R4,KIPAR4 

#BIT8,SR0 

R2,(R1) 

(R0),R3 

(RO) 
#37, R3 
R2,R3 
12$ 

R1 ,VIRT1 

PCFORMPA 

17 



#1$,$LPERR 



;LOAO VIRTUAL ADDR. FOR PSW INTO R1 

J LOAD DATA FOR PSW IN R2 

JLOAD R4 WITH PAR VALUE 

;LOAD KERNEL PAR 4 BITS <11:00> 

;TURN ON "DESTINATION-ONLY-RELOCATION" 

{LOAD PSW USING ADDER CHIPS ( PAR4 + VIRT. ADDR.) 

;READ PSW BACK WITHOUT USING MEM. MGMT . 

jTURN OFF MEM. MGMT. MAINT. MODE 

;CLEAR THE PSW 

;MASK T-BIT & CC BITS OUT OF DATA READ 
;WAS PSW WRITTEN WHILE IN MAINT. MODE? 
{BRANCH IF YES 

;SAVE VIRTUAL ADDR. TO FORM PHYSICAL ADDR. 
;G0 FORM PHYSICAL ADDR. FOR TYPING 
;PSW DID NOT HAVE DATA THAT IT SHOULD 
JHAVE, APPARENTLY PHYS. ADDR. OF PSW WAS 
;NOT FORMED BY ADDERS USING THE 
{VIRTUAL ADDR. AND KIPAR4 
{FOR TIGHTER SCOPE LOOP 
{REPLACE ERROR CALL WITH 
{ "BR 11$" = 000743 

{RESET LOOP ON ERROR POINTER TO 1$ 



*TEST 



26 RELOCATION & ADDER TEST (WITH CARRIES) < 

THE FOLLOWING TEST USES THE SAME METHOD AS THE PREVIOUS 
TEST TO VERIFY MEMORY MANAGEMENTS ABILITY TO CONSTRUCT 
PHYSICAL BUS ADDRESSES USING A VIRTUAL BUS ADDRESS AND THE 
CONTENTS OF A PAGE ADDRESS REGISTER. HOWEVER, THE VALUES 
AND PATTERNS USED IN THIS TEST WILL GENERATE CARRIES FROM 
CHIP TO CHIP AND CHECK "WRAPAROUND" TO ADDRESS 000000 BY 
USING VIRTUAL ADDR. 100100 AND KIPAR4 = 7777. 



024454 000004 



TST26J SCOPE 



lie « « « « >K « « 



1$: 



2481 


024456 


01 2737 


024456 


001110 2$: 


MOV 


2482 


024464 


01 2700 


064276 




MOV 


2483 


024470 


01 2701 


102176 




MOV 


2484 


024474 


012702 


125253 




MOV 


2485 


024500 


012704 


000621 




MOV 


2486 


024504 


010437 


172350 




MOV 


2487 


024510 


01 1037 


001 176 




MOV 


2488 


024514 


052737 


000400 


1 77S72 


BIS 


2489 


024522 


01 021 1 






MOV 


2490 


024524 


01 1003 






MOV 


2491 


024526 


000005 






RESET 


2492 


024530 


013710 


001176 




MOV 


2493 


024534 


020203 






CMP 


2494 












2495 


024536 


001405 






BEQ 


2496 


024540 


010137 


001402 




MOV 


2497 


024544 


004737 


036354 




USR 



{KERNEL PAR'S AND PDR ' S HAVE BEEN 

{SETUP BY THE PREVIOUS TEST 
#2$,$LPERR {SET LOOP ON ERROR POINTER TO 2$ 

#64276, RO {LOAD PHYSICAL AODR . PBA INTO RO 

#102176, R1 {LOAD VIRTUAL ADDR. VBA INTO R1 

#125253, R2 {LOAD TEST PATTERN INTO R2 

^621, R4 {LOAD R4 WITH PAR VALUE 

R4,KIPAR4 {LOAD KERNEL PAR 4 BITS <11:00> 

(RO),$TMPO {SAVE CC-. TENTS AT TEST LOCATION 

#BIT8,SR0 {TURN ON "DEST INATION-ONLY-RELOCATION" 

R2,(R1) {LOAD 125253 USING ADDER CHIPS (PAR4 + VIRT ADDR.) 

(R0),R3 {READ 125253 BACK WITHOUT USING MEM. MGMT. 

{TURN OFF MEMORY MGMT. MAINT. MODE 
$TMPO,(RO) {RESTORE ORIGINAL CONTENTS TO TEST LOC. 

R2,R3 {WAS SAME PATTERN READ BACK THAT WAS 

{WRITTEN USING "DEST-ONLY-RELOC . "? 
3$ {BRANCH IF YES 

RI.VIRTI {SAVE VIRTUAL ADDR. TO FORM PHYS. ADDR 

PCFORMPA I GO FORM PHYSICAL ADDRESS FOR TYPING 
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SEQ 0053 



2498 


024550 


104017 








ERROR 


2499 














2500 














2501 














2502 














2503 














2504 














2505 














2506 


024552 








3$: 




2507 


024552 


012737 


024552 


0011 10 


4$: 


MOV 


2508 


024560 


01 2700 


064476 






MOV 


2509 


024564 


01 2701 


1 12376 






MOV 


2510 


024570 


01 2702 


125254 






MOV 


251 1 


024574 


01 2 "04 


000521 






MOV 


2512 


024600 


01 0437 


172350 






MOV 


2513 


024604 


01 1037 


001 176 






MOV 


2514 


024610 


052737 


000400 


177B72 




BIS 


2515 


024616 


01 021 1 








MOV 


2516 


024620 


01 1003 








MOV 


2517 


024622 


000005 








RESET 


2518 


024624 


01 3/1U 


001176 






MOV 


2519 


024630 


020203 








CMP 


2520 














2521 


024632 


001405 








BEQ 


2522 


024634 


010137 


001402 






MOV 


2523 


024640 


004737 


036354 






USR 


2524 


024644 


104017 








ERROR 


2525 














2526 














2527 














2528 














2529 














2530 














2531 










5$: 




2532 


024646 










2533 


024646 


01 2737 


024646 


001110 


6$: 


MOV 


2534 


024654 


01 2700 


061076 






MOV 


2535 


024660 


01 2701 


106776 






MOV 


2536 


024664 


01 2702 


125255 






MOV 


2537 


024670 


01 2704 


000521 






MOV 


2538 


024674 


010437 


172350 






MOV 


2539 


024700 


01 1037 


001 176 






MOV 


2540 


024704 


052737 


000400 


177572 




BIS 


2541 


024712 


01 C21 1 








MOV 


2542 


024714 


01 1003 








MOV 


2543 


024716 


000005 








RESET 


2544 


024720 


013710 


001176 






MOV 


2545 


024724 


020203 








CMP 


2546 












BEQ 


2547 


024726 


001405 








2548 


024730 


010137 


001402 






MOV 


2549 


024734 


004737 


036354 






USR 


2550 


024740 


104017 








ERROR 


2551 














2552 














2553 















#4$,$LPERR 
#64476, RO 
#1 12376, Rl 
#1 25254, R2 
#521, R4 {LOAD 
R4,KIPAR4 
(RO) ,$TMPO 
#BIT8,SR0 
R2,(R1 ) 
(R0),R3 

STMPO, (RO) 
R2,R3 

.->$ 

Rl ,VIRT1 

PCFORMPA 

17 



#6$,$LPERR 
#61076, RO 
#106776, Rl 
#1 25255, R2 
#521, R4 {LOAD 
R4,KIPAR4 
(RO) ,$TMPO 
#BIT8,SR0 
R2,(R1 ) 
(R0),R3 

STMPO, (RO) 
R2,R3 

7$ 

Rl ,VIRT1 

PCFORMPA 

17 



TEST LOCATION DID NOT HAVE PATTERN 
THAT SHOULD HAVE BEEN WRITTEN TO IT. 
APPARENTLY PHYSICAL ADDR. WAS 
FORMED WRONG BY ADDERS USING 
THE VIRTUAL ADDR. AND KIPAR4 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 2$" = 000742 

SET LOOP ON ERROR POINTER TO 4$ 
LOAD PHYSICAL ADDR. PBA INTO RO 
LOAD VIRTUAL ADDR. VBA INTO Rl 
LOAD TEST PATTERN INTO R2 
WITH PAR VALUE 

LOAD KERNEL PAR 4 BITS <1l:00> 

SAVE CONTENTS AT TEST LOCATION 

TURN ON "DESTINATION-ONLY-RELOCATION" 

LOAD 125254 USING ADDER CHIPS ( PAR4 ■♦• VIRT ADDR.) 

READ 125254 BACK WITHOUT USING MEM. MGMT. 

TURN OFF MEMORY MGMT. MAINT. MODE 

RESTORE ORIGINAL CONTENTS TO TEST LOC. 

WAS SAME PATTERN READ BACK THAT WAS 

WRITTEN USING "DEST-ONLY-RELOC"? 

BRANCH IF YES 

SAVE VIRTUAL ADDR. TO FORM PHYS. ADDR 
GO FORM PHYSICAL ADDRESS FOR TYPING 
TEST LOCATION DID NOT HAVE PATTERN 
THAT SHOULD HAVE BEEN WRITTEN TO IT. 
APPARENTLY PHYSICAL ADDR. WAS 
FORMED WRONG BY ADDERS USING 
THE VIRTUAL ADDR. AND KIPAR4 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 4$" = 000742 

SET LOOP ON ERROR POINTER TO 6$ 
LOAD PHYSICAL ADDR. PBA INTO RO 
LOAD VIRTUAL ADDR. VBA INTO Rl 
LOAD TEST PATTERN INTO R2 
WITH PAR VALUE 

LOAD KERNEL PAR 4 BITS <1i:00> 

SAVE CONTENTS AT TEST LOCATION 

TURN ON "DESTINATION-ONLY-RELOCATION" 

LOAD 125255 USING ADDER CHIPS (PAR4 + VIRT ADDR.) 

READ 125255 BACK WITHOUT USING MEM. MGMT. 

TURN OFF MEMORY MGMT. MAINT. MODE 

RESTORE ORIGINAL CONTENTS TO TEST LOC 

WAS SAME PATTERN READ BACK THAT WAS 

WRITTEN USING "DEST-ONLY-RELOC"? 

BRANCH IF YES 

SAVE VIRTUAL ADDR. TO FORM PHYS. ADDR 
GO FORM PHYSICAL ADDRESS FOR TYPING 
TEST LOCATION DID NOT HAVE PATTERN 
THAT SHOULD HAVE BEEN WRITTEN TO IT. 
APPARENTLY PHYSICAL ADDR. WAS 
FORMED WRONG BY ADDERS USING 
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SEQ 00S4 



2554 
2555 
2556 
2557 
2558 
2559 
2560 
2561 
2562 
2563 
2564 
2565 
2566 
2567 
2568 
2569 
2570 
2571 
2572 
2573 
2574 
2575 
2576 
2577 
2578 
2579 
2580 
2581 
2582 
2583 



;THE VIRTUAL ADDR. AND KIPAR4 
;FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
"BR 6$" = 000742 



2603 
2604 
2605 
2606 
2607 
2608 
2609 



024742 








7$: 








024742 


01 2737 


024742 


001110 


8$: 


MOV 


#8$,$LPERR 


;SET LOO ON ERROR POINTER TO 8$ 


024750 


01 2700 


060076 






MOV 


<^60076,R0 


JLOAD PHYSICAL ADDR. PBA INTO RO 


024754 


01 2701 


107776 






MOV 


(i'107776,Rl 


JLOAD VIRTUAL ADDR. VBA INTO R1 


024760 


01 2702 


125256 






MOV 


*125256,R2 


ILOAD TEST PATTERN INTO R2 


024764 


01 2704 


000501 






MOV 


#501, R4 ;L0AD 


R4 WITH PAR VALUE 


024770 


01 0437 


172350 






MOV 


R4,KIPAR4 


;LOAD KERNEL PAR 4 BITS <1l:00> 


024774 


01 1037 


001 176 






MOV 


(RO) ,$TMP0 


;SAVE CONTENTS AT TEST LOCATION 


025000 


052737 


000400 


177172 




BIS 


#BIT8,SR0 


;TURN ON "DEST INATION-ONLY-RELOCATION" 


025006 


01 021 1 








MOV 


R2,(R1 ) 


JLOAD 125256 USING ADDER CHIPS (PAR4 + VIRT 


025010 


01 1003 








MOV 


(RO) ,R3 


;READ 125256 BACK WITHOUT USING MEM. MGMT. 


025012 


000005 








RESET 




;TURN OFF MEMORY MGMT. MA INT. MODE 


025014 


013710 


001176 






MOV 


STMPO, (RO) 


{RESTORE ORIGINAL CONTENTS TO TEST LOG. 


025020 


020203 








CMP 


R2,R3 


;WAS SAME PATTERN READ BACK THAT WAS 
;WRITTEN USING "DEST-ONLY-RELOC . " ? 


025022 


001405 








BEO 


9$ 


; BRANCH IF YES 


025024 


010137 


001402 






MOV 


R1 ,VIRT1 


;SAVE VIRTUAL ADDR. TO FORM PHYS. ADDR 


025030 


004737 


036354 






USR 


PCFORMPA 


;G0 FORM PHYSICAL ADDRESS FOR TYPING 


025034 


104017 








ERROR 


17 


5 TEST LOCATION DID NOT HAVE PATTERN 



2584 


025036 








9$: 






25B5 


025036 


012737 


025036 


OOlllt 


10$: 


MOV 


#10$,$LPERR 


2586 


025044 


012700 


000000 






MOV 


#000000, RO 


2587 


025050 


012701 


100100 






MOV 


#100100, R1 


2588 


025054 


01 2702 


125257 






MOV 


#125257, R2 


2589 


025060 


012704 


007777 






MOV 


#7777, R4 


2590 


025064 


010437 


172350 






MOV 


R4,KIPAR4 


2591 


025070 


01 1037 


001176 






MOV 


(RO) , STMPO 


2592 


025074 


052737 


000400 


177572 




BIS 


#BIT8,SR0 


2593 


025102 


01021 1 








MOV 


R2, (R1 ) 


2594 


025104 


01 1003 








MOV 


(R0),R3 


2595 


025106 


000005 








RESET 




2596 


0251 10 


01 3710 


001176 






MOV 


STMPO, (RO) 


2597 


0251 14 


020203 








CMP 


R2,R3 


2598 
















2599 


0251 16 


001405 








BEQ 


IIS 


2600 


025120 


010137 


001402 






MOV 


R1 ,VIRT1 


2601 


025124 


004737 


036354 






USR 


PC.FORMPA 


2602 


025130 


104017 








ERROR 


17 



;THAT SHOULD HAVE BEEN WRITTEN TO IT. 
JAPPARENTLY PHYSICAL ADDR. WAS 
; FORMED WRONG BY ADDERS USING 
;THE VIRTUAL ADDR. AND KIPAR4 
;FOR TIGHTER SCOPE LOOP 
JREPLACE ERROR CALL WITH 
;"BR 8$" a 000742 

;SET LOOP ON ERROR POINTER TO 10$ 

JLOAD PHYSICAL ADDR. PBA INTO RO 

{LOAD VIRTUAL ADDR. VBA INTO R1 

;LOAD TEST PATTERN INTO R2 

;LOAD R4 WITH PAR VALUE 

;LOAD KERNEL PAR 4 BITS <11:00> 

;SAVE CONTENTS AT TEST LOCATION 

;TURN ON "DESTINATION-ONLY-RELOCATION" 

JLOAD 125257 USING ADDER CHIPS ( PAR4 + VIRT ADDR.) 

{READ 125257 BACK WITHOUT USING MEM. MGMT. 

;TURN OFF MEMORY MGMT. MAINT. MODE 

{RESTORE ORIGINAL CONTENTS TO TEST LOC. 

;WAS SAME PATTERN READ BACK THAT WAS 

{WRITTEN USING "DEST-ONLY-RELOC"? 

{BRANCH IF YES 

{SAVE VIRTUAL ADDR. TO FORM PHYS. ADDR 
{GO FORM PHYSICAL ADDRESS FOR TYPING 
{TEST LOCATION DID NOT HAVE PATTERN 
{THAT SHOULD HAVE BEEN WRITTEN TQ IT. 
{APPARENTLY PHYSICAL ADDR. WAS 
{FORMED WRONG BY ADDERS USING 
{THE VIRTUAL ADDR. AND KIPAR4 
{FOR TIGHTER SCOPE LOOP 
{REPLACE ERROR CALL WITH 
{"BR 10$" = 000742 
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SE9 0055 



2610 
261 1 
2612 
2613 
2614 
2615 
2616 
2617 
2618 
2619 
2620 
2621 
2622 
2623 
2624 
2625 
2626 
2627 
2628 
2629 
2630 
2631 
2632 
2633 
2634 
2635 
2636 
2637 
2G38 
2539 
2640 
2641 
2642 
2643 
2644 
2645 
2646 
2647 
2648 
2649 
2650 
2651 
2652 
2653 
2554 
2655 
2656 
2657 
2658 
2659 
2660 
2661 
2662 
2663 
2664 
2665 



025132 
025132 



012737 024456 001110 



#1$,$LPERR 



{RESET LOOP ON ERROR POINTER TO 1$ 



025140 000004 



025142 
025146 
025152 
025156 
025162 
025166 
025172 
025174 
025200 
025202 
025205 
025210 
025214 
025220 
025224 
025230 
025232 
025234 
025240 
025244 
025250 
025254 
025262 
025270 
025276 
025304 
025310 



005037 
012704 
012705 
010437 
01 0j37 
01 2700 
005001 
01 2702 
010120 
062701 
077204 
01 2710 
012700 
01 2701 
012702 
01 0120 
077202 
105037 
105037 
010537 
010437 
012737 
012737 
012737 
013737 
012700 
012701 



• « « 4 « » « « « 
♦TEST 27 



♦ ★♦♦*******>ii******#** ****************** 

READ AND WRITE WHILE IN RELOCATE MODE 



THE FOLLOWING TEST TURNS ON MEMORY MANAGEMENT AND THEN 
READS AND WRITES LOCATIONS BETWEEN PHYSICAL ADDRESSES 
060000-067600. ONE LOCATION IN EVERY BLOCK (32. WORDS) 
IS WRITTEN USING PAR4 AND READ USING PARS. THIS IS 
DONE IN BOTH USER AND KERNEL MODES. THE USER PAR/PDR'S 
ARE SETUP AT THE BEGINNING OF THE TEST AND ONCE MEMORY 
MANAGEMENT IS TURNED ON IT IS LEFT ON FOR THE REST OF THE 
OF THE PROGRAM. THE "MODE" INPUT TO THE PAR/PDR ADDRESS MUX 
IS CHECKED BY READING AND WRITING IN USER MODE. REMEMBER 
ALSO, THAT SINCE MEMORY MANAGEMENT IS ON (IN RELOCATE 
MODE) THE PROGRAM ITSELF IS USING ITS VIRTUAL ADDRESSES AND 
THE PAR/PDR'S TO EXECUTE. 

WHILE TESTING IN KERNEL MODE, USER PAGFS 4 & 5 ARE MAPPED 
NON-RESIDENT WITH DIFFERENT PAR VALUES THAN THE KERNEL 
PAR'S TO BE SURE THAT THE KERNEL PAR'S AND PDR'S ARE BEING 
USED WHEN IN KERNEL MODE (AND VICE VERSA WHILE TESTING IN 
USER MODE). IF A MEM. MGMT. TRAP OCCURS. THE PROGRAM GOES 
TO 8$ WHERE THE TRAP IS REPORTED. 



**4t«*****4i 

: SCOPE 



********************* 



************ **>!>***<»* 



177776 




1$: 


CLR 


PSW 


000577 






MOV 


#577, R4 


000600 






MOV 


#600, R5 
R4,KIPAR4 


172350 






MOV 


172352 






MOV 


R5,KIPAR5 


177640 






MOV 
CLR 


#UIPARO,RO 
R1 


000007 






MOV 


#7,R2 






2$: 


MOV 


Rl , (RO)* 


000200 






ADD 
SOB 


#200, R1 
R2,2$ 


007600 






MOV 


#7600, (RO) 


177600 






MOV 


#UIPDRO,RO 


077406 






MOV 


#77406, Rl 


000010 






MOV 


./10,R2 






3S: 


MOV 
SOB 


Rl , (R0) + 
R2,3$ 


177610 






CLRB 


UIPDR4 


177612 






CLRB 


UIPDR5 


177650 






MOV 


R5,UIPAR4 


177652 






MOV 


R4,UIPAR5 


000001 


177572 




MOV 


#1 ,SRO 


025314 


001 110 




MOV 


#5$,$LPERR 


025526 


000250 




MOV 


#8$,MMVEC 


177776 


001 176 


4$: 


MOV 


PSW, STMPO 


100100 






MOV 


#100100, RO 


120000 






MOV 


#120000, Rl 



START IN KERNEL MODE 

LOAD R4 WITH VALUE FOR PAR4 

LOAD R5 WITH VALUE FOR PARS 

LOAD KERNEL PAR4 

LOAD KERNEL PARS 

LOAD ADDRESS OF FIRST USER PAR IN RO 
CLEAR Rl 

LOAD LOOP COUNTER WITH A 7 

MAP USER PAR'S TO PAGES 0-6 (4K EACH) 

LOOP UNTIL UIPAR0-UIPAR6 ARE LOADED 

MAP UStH HART TO THE I/O PAGE 

LOAD ADDRESS OF FIRST USER PDR IN RO 

LOAD PDR DATA INTO Rl 

LOAD LOOP COUNTER WITH AN 8 

MAP ALL 8 PAGES 128 BLOCKS, UPWARD 

•■.XPANDABLE, READ/WRITE 
MAP USER SPACE NON-RESIDENT WHILE 

TESTING KERNEL SPACE 
MAP USER PAR'S OPPOSITE OF KIPAR'S 

TURN ON MEMORY MANAGEMENT (RELOCATE MODE) 

SET LOOP ON ERROR POINTER TO 5$ 

SET M. M. TRAP VECTOR TO 8$ 

SAVE PSW IN CASE OF ERROR 

PUT VIRTUAL ADDR. THAT USER PAR4 IN RO 

PUT VIRTUAL ADDR. THAT USES PARS IN Rl 
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SEO 0096 



2666 


025314 


010010 




2667 


025316 


01 1 102 




2668 


025320 


020002 




2669 


025322 


00141 1 




2670 


025324 


010137 


001404 


2671 


025330 


01 0037 


001402 


2672 


025334 


004737 


036354 


2673 


025340 


104020 




2674 








2675 








2676 








2677 








2678 








2679 


025342 


01 3 "00 


001402 


2680 


025346 


062700 


000100 


2681 


025352 


062701 


000100 


2682 


025356 


020127 


127700 


2683 


025362 


001354 




2684 


025364 


032737 


140000 


2685 


025372 


001026 




2S86 


025374 


01 0437 


177650 


2587 


025400 


010537 


177652 


2688 


025404 


112737 


000006 


2669 


025412 


112737 


000006 


2690 


025420 


105037 


172310 


2691 


025424 


105037 


172312 


2692 


025430 


01 0537 


172350 


2693 


025434 


010437 


172352 


2694 


025440 


01 2737 


140000 


2695 


025446 


000713 




2696 


025450 


005037 


177776 


2697 


025454 


012737 


077406 


2698 


025462 


01 2737 


077406 


2699 


025470 


01 0537 


172350 


2700 


025474 


010537 


172352 


2701 


025500 


01 0537 


177650 


2702 


025504 


010537 


177652 


2703 


025510 


012737 


002400 


2704 


025516 


012737 


025142 


2705 


025524 


000427 




2706 








2707 


025526 


012637 


001356 


2708 


025532 


012637 


001360 


2709 








2710 








271 1 








2712 


025536 


010037 


001402 


2713 


025542 


004737 


036354 


2714 


025546 


013737 


177572 


2715 


025554 


013737 


177576 


2716 


025562 


042737 


160000 


2717 


025570 


104052 




2718 








2719 








2720 








2721 









SS! 



3$: 



177610 
177612 



177776 



172310 
172313 



000250 
001110 



7$: 



8$: 



001366 
001370 
177572 



MOV 
MOV 
CMP 
BEO 
MOV 
MOV 
USR 
ERROR 



MOV 

ADD 

ADD 

CMP 

BNE 

BIT 

BNE 

MOV 

MOV 

MOVB 

MOVB 

CLRB 

CLRB 

MOV 

MOV 

MOV 

BR 

CLR 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

BR 



MOV 
MOV 



MOV 
USR 
MOV 
MOV 
BIC 
ERROR 



R0,(R0) 
(R1),R2 
R0,R2 
6$ 

R1 ,VIRT2 
RO.VIRTI 
PCFORMPA 
20 



VIRT1 ,R0 
#100, RO 
#100, R1 
R1 ,#127700 
5$ 

#140000, PSIiif 
7$ 

R4,UIPAR4 

R5,UIPAR5 

#6,UIPDR4 

."B.UIPDRS 

KIPDR4 

KIPDR5 

R5,KIPAR4 

R4,KIPAR5 

#140000, PSW 

4$ 

PSW 

#77406, KIPDR4 

#77406, KIPDR5 

R5,KIPAR4 

R5,KIPAR5 

R5,UIPAR4 

R5,UIPAR5 

#MGMERR,MMVEC 

#1$,$LPERR 

TST30 

(KSP)+,TRAPPC 
(KSP)+,TRAPPS 



R0,VIRT1 

PCFORMPA 

SRO.WASSRO 

SR2,WASSR2 

#160000, SRO 

52 



WRITE TO TEST LOG. USING PAR4 
READ THE SAME LOC. , BUT USING PAR5 
DID WE READ WHAT WE WROTE? 
BRANCH IF YES 

SAVE VIRTUAL ADDR. THAT SELECTED PARS 

SAVE VIRTUAL ADDR. THAT SELECTED PAR4 

GO FORM PHYSICAL ADDRESS BEING USED 

READING LOC. USING PARS AND A VIRT. 

ADDR. DID NOT FIND DATA WRITTEN WHEN USING 

PAR4 AND VIRT. ADDRESS. 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 5$" = 000765 

RESTORE VBA IN RO 

CHANGE VIRTUAL ADDRS. TO POINT TO NEXT BLOCK 

•.WERE BLOCKS FROM 60000-676000 ALL TRIED? 
; BRANCH IF NO 

jHAVE WE DONE TEST IN USER MODE YET? 
{BRANCH IF YES 
JLOAD USER PAR4 
JLOAD USER PAR5 

;MAP USER SPACE R/W TO TEST IT 

MAP KERNEL SPACE NON-RESIDENT WHILE 

TESTING USER SPACE 
MAP KERNEL PAR'S OPPOSITE UIPAR'S 

;G0 TO USER MODE 

;G0 BACK AND READ/WRITE IN USER MODE 
;G0 BACK TO KERNEL MODE BEFORE LEAVING 
; REMAP KERNEL PAGES READ/WRITE 

{MAP KERNEL AND USER PAR'S 4 & 5 
! BACK TO 12-16K 



{RESTORE ADDR. OF NORMAL M.M. TRAP ROUTINE 
{RESET LOOP ON ERROR POINTER TO 1$ 
{ {GO TO NEXT TEST 

{SAVE PC & PS OF TRAP 

{PROGRAM WILL TRAP TO HERE IF TRY 
{TO USE USER PDR'S WHEN IN KERNEL MODE 
{OR KERNEL PDR'S WHEN IN USER MODE 
{SAVE VIRTUAL ADDRESS FOR ERROR REPORT 
{GO FORM THE PHYSICAL ADDRESS BEING USED 
{SAVE SRO & SR2 FOR ERROR REPORT 

{CLEAR ERROR BITS IN SRO 

{M.M. TRAP WHILE IN RELOCATE MODE - 

{REFERENCED WRONG SET OF PDR'S 

{FOR TIGHTER SCOPE LOOP 

{REPLACE ERROR CALL WITH 

;A "NOP" « 000240 
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SEO 0037 



2722 
2723 
2724 
2725 
2726 
2727 
2728 
2729 
2730 
2731 
2732 
2733 
2734 
2735 
2736 
2737 
2738 
2739 
2740 
2741 
2742 
2743 
2744 
2745 
2746 
2747 
2748 
2749 
2750 
2751 
2752 
2753 
2754 
2755 
2756 
2757 
2758 
2759 
2760 
2761 
2762 
2763 
2764 
2765 
2766 
2767 
2768 
2769 
2770 
2771 
2772 
2773 
2774 
2775 
2776 
2777 



025572 013746 001360 
025576 013746 001356 
025602 000002 



025604 
025606 
025606 
025612 
025616 
025622 
025626 
025630 
025632 
025636 
025642 
025646 
025654 
025660 
025664 
025670 
025672 
025674 
025676 
025702 
025704 



000004 

004737 
01 2702 
01 2700 
01 2701 
01 0120 
077202 
012705 
01 2704 
012703 
01 2737 
01 2700 
012702 
012701 
010120 
077202 
01 1313 
031527 
001002 
104021 



01 2700 

031027 

025724 001403 



025714 
025720 



036002 
000004 
172346 
000600 



172300 
000010 
017776 
025654 
172300 
000010 
077406 



025706 000422 
025710 012702 



000010 
172300 
000100 



025726 020500 
025730 001401 
025732 104022 



MOV 
MOV 
RTI 



TRAPPS,-(KSP) 
TRAPPC,-(KSP) 



{PUT PC & PS OF TRAP ON STACK 
{RETURN TO TEST 



♦TEST 30 



W-BIT LOGIC TEST, KERNEL PDR'S 

THIS TEST WRITES TO EIGHT (8) DIFFERENT VIRTUAL ADDRESSES 
(VBA'S « 17776,37776,57776,77776.117776,137776.157776. & 1.7777 
& PBA'S CONSTRUCTED » 17776.37776,57776.77776,77776, 
77776.77776. & 777776 RESPECTIVELY). 

WHICH SHOULD CAUSE THE "W-BIT" TO SET IN EACH OF THE 
EIGHT (8) KERNEL PAGE DESCRIPTOR REGISTERS. THE PDR'S 
ARE CHECKED TO SEE THAT IT'S W-BIT DOES SET WHEN THE 
PAGE IT IS MAPPED TO IS WRITTEN TO AND THAT THE W-BIT 
DOES NOT SET IN ANY OF THE OTHER PDR'S. KERNEL PDR'S 3,4,5.6 
ARE MAPPED TO 12-16K FOR THIS TEST. ALSO THE W-BIT 
SHOULD BE CLEARED WHEN THE PDR IS WRITTEN TO. THE 
W-BIT PORTION OF THE PDR'S AND THE PAR/POR ADRS MUX 
ARE BEING CHECKED. 
♦♦««♦♦♦**«♦***♦«*♦****«*♦•♦♦♦♦**♦*♦*♦*•*******♦*•*♦•******♦*♦♦♦ 
TST30! SCOPE 
1$: 



4$: 



JSR 
MOV 
MOV 
MOV 
MOV 
SOB 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
SOB 
MOV 
BIT 
BNE 
ERROR 



PC, TOFF 
#4.R2 

#KIPAR3,R0 
#600, R1 
R1 , (R0)4- 
R2,2$ 

#KIPDR0,R5 

#10,R4 

#17776, R3 

#3S,$LPERR 

#KIPDRO,RO 

#10, R2 

#77406, R1 

R1 ,(R0) + 

R2,4$ 

(R3),(R3) 

(R5),#WBIT 

5$ 

21 





BR 


8$ 


5$: 


MOV 


#10, R2 




MOV 


#KIPDRO,RO 


6$: 


BIT 


(RO),#WBIT 




BEQ 


7$ 




CMP 


R5,R0 




BEO 


7$ 




ERROR 


22 



TURN T-BIT TRAPPING OFF FOR THIS TEST 
SET LOOP COUNTER TO 4 
LOAD ADDRESS OF PARS INTO RO 
LOAD "12-16K" PAR VALUE INTO R1 
MAP PARS 3-6 TO 12-16K 
LOOP TIL ALL 4 OF THEM LOADED 
LOAD ADDRESS OF FIRST PDR TO BE TESTED IN R5 
SET LOOP COUNTER TO B 

INITIALIZE VIRTUAL ADDRESS TO BE IN R3 

SET LOOP ON ERROR POINTER TO 3$ 

LOAD ADDR. OF FIRST PDR TO BE SETUP IN RO 

SET LOOP COUNTER TO 8 

PUT "W-BIT OFF DATA" INTO R1 

CLEAR ALL W-BITS BY WRITING TO ALL PDRS 

LOOP UNTIL ALL OF THEM SETUP 

DO "DATO" TO VIRTUAL ADDR. -SETTING A W-BIT 

DID THAT CAUSE W-BIT TO BE SET? 

BRANCH IF YES 

W-BlT DID NOT GET SET IN PDR 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 3$" « 000763 

SKIP CHECKING OTHER PDR'S-ERROR WILL SET W~BITS 
SET LOOP COUNTER TO 8 

LOAD ADDR. OF FIRST PDR TO BE CHECKED IN RO 
DID W-BIT IN OTHER PDRS REMAIN CLEAR? 

BRANCH IF YES 

IF W-BIT SET, THEN WAS IT PDR UNDER TEST? 
BRANCH IF YES 

W-BIT GOT SET IN MORE THAN ONE PDR 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 



CfKIHBO PDP 11/34 MEM MGNT DIAG MACY11 30A( 1052) 

T30 W 



FK''HB. 


P1 1 


27-JUN-78 


09:27 


2778 








2779 


025734 


062 700 


000002 


2780 


025740 


07721 1 




2781 


025742 


010115 




2782 


025744 


031 527 


000100 


2783 


025750 


001401 




2784 


025752 


104023 




2785 








2786 








2787 








2788 


025754 


062705 


000002 


2789 


025760 


062703 


020000 


2790 


025764 


077445 




2791 


025766 


01 2737 


025606 


2792 


025774 


004737 


036036 


2793 








2794 








2795 








2796 








2797 








2798 








2799 








2800 








2801 








2U02 








2003 








2804 








2305 








2806 








2807 








2908 








2809 








281 








231 1 


026000 


000u04 




281 2 


026002 


01 2737 


1 40000 


2313 


0260 1 


004737 


036002 


231 4 


025014 


01 2702 


000004 


2815 


026020 


01 2700 


1 77646 


281 6 


026024 


01 2701 


000600 


2817 


026030 


01 n 1 20 




2018 


026032 


077202 




2319 


026034 


01 2705 


1 77600 


2320 


026040 


01 2704 


00001 


2821 


026044 


01 2703 


01 7776 


2822 


02B0B0 


01 2737 


026056 


2823 


026056 


01 2700 


1 77600 


2824 


026062 


01 2702 


000010 


2825 


026066 


01 2701 


077406 


2826 


025072 


01 0120 




2827 


026074 


077202 




2828 


026076 


011313 




2829 


026100 


031527 


000100 


2330 


026104 


001002 




2631 


026106 


104021 




2832 








2833 









27-JUN-78 09:33 PAGE 59 
-BIT LOGIC TEST, KERNEL PDR ' S 



ADD 
SOB 
MOV 
BIT 
BEQ 
ERROR 



ADD 
ADD 
SOB 
MOV 
USR 



R2,6$ 

R1 , (R5) 

(R5),(!'WBIT 

8$ 

23 



if2,R5 

«^20000,R3 

R4,3$ 

#1$,$LPERR 
PC, TON 



; "BR 3S" = 000750 

; POINT RO TO NEXT PDR TO BE CHECKED 
;LOOP UNTIL ALL 8 CHECKED FOR CLEAR W-BIT 
;WRITE TO THE PDR TESTED TO CLEAR W-BIT 
;DID WRITING PDR CLEAR THE W-BIT? 
•.BRANCH IF YES 

;W-BIT DID NOT CLEAR BY WRITING THE PDR 
;FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
; "BR 3$" = 000740 

; POINT R5 TO THE NEXT PDR TO BE TESTED 
;CHANGE VIRT. ADDR TO REF. NEXT PDR 
;LOOP BACK TO 3$ UNTIL ALL 8 PDR'S TESTED 
;RESET LOOP ON ERROR POINTER TO 1$ 
;TURN T-BIT BACK ON FOR NEXT TEST 



♦TEST 31 W-BIT LOGIC TES;, USER PDR'S 



THIS TEST WRITES TO EIGHT (8) DIFFERENT VIRTUAL ADDRESSES 
(VBA'S = 17776,37776,57776,77776,117776,137776.157776. & 177776 
& PBA'S CONSTRUCTED = 17776,37776,57776.77776.77776, 
77776,77776, & 777776 RESPECTIVELY). 

WHICH SHOULD CAUSE THE "W-BIT" TO SET IN EACH OF THE 
EIGHT (8) USER PAGE DESCRIPTOR REGISTERS. THE PDR'S 
ARE CHECKED TO SEE THAT IT'S W-BIT DOES SET WHEN THE 
PAGE IT IS MAPPED TO IS WRITTEN TO AND THAT THE W-BIT 
DOES NOT SET IN ANY OF THE OTHER PDR'S. USER PDR'S 3.4,5.6 
ARE MAPPED TO 12-16K FOR THIS TEST. ALSO THE W-BIT 
SHOULD BE CLEARED WHEN THE PDR IS WRITTEN TO. THE 
W-BIT PORTION OF THE PDR'S AND THE PAR/PDR ADRS MUX 
ARE BEING CHECKED. 

4i«»«%4i«*«*i|i**4t4ii(c«««i»itii»i(ii|i**4>4i««'»«**«**<«>4i4'>t<'t>4'**4>**«>t'i«>4>* 

TST31! SCOPE 

IS: MOV *140000,PSW 

JSR PC, TOFF 

MOV HA,n2 

MOV /5»UIPAR3,RO 

MOV ^600, R1 

2$: MOV R1,(R0)+ 

SOB R2,2$ 

MOV #UIPDR0,R5 

MOV Ji'10,R4 

MOV /^17776,R3 

MOV *3$,$LPERR 

3S: MOV A'UIPDRO,RO 

MOV /^10,R2 

MOV #77406, R1 

AS: MOV R1,(R0)-l- 

SOB R2,4$ 

MOV (R3),(R3) 

BIT (R5),#WBIT 

BNE 5$ 

ERROR 21 



;G0 TO USER MODE FOR THIS TEST 
•,TURN T-BIT TRAPPING OFF FOR THIS TEST 
;SET LOOP COUNTER TO 4 
;LOAD ADDRESS OF PAR3 INTO RO 
;LOAD "12-16K" PAR VALUE INTO R1 
;MAP PARS 3-6 TO 12-16K 
;LOOP TIL ALL 4 OF THEM LOADED 
;L0AD ADDRESS OF FIRST PDR TO BE TESTED IN R5 
; SET LOOP COUNTER TO 8 

UNITIALIZE VIRTUAL ADDRESS TO BE IN R3 
■,SET LOOP ON ERROR POINTER TO 3$ 
JLOAD ALjR. OF FIRST PDR TO BE SETUP IN RO 
•,SET LOOP COUNTER TO 8 
;PUT "W-BIT OFF DATA" INTO R1 
;CLEAR ALL W-BITS BY WRITING TO ALL PDRS 
;LOOP UNTIL ALL OF THEM SETUP 
;D0 "DATO" TO VIRTUAL ADDR . -SETTING A W-BIT 
;DID THAT CAUSE W-BIT TO BE SET? 
;BRANCH IF YES 

■,W-BIT DID NOT GET SET IN PDR 
; FOR TIGHTER SCOPE LOOP 
; REPLACE ERROR CALL WITH 
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SEO 0059 



2834 








2035 


0261 10 


000422 




2036 


0261 12 


01 2702 


000010 


2837 


0261 16 


01 2700 


177600 


2838 


026122 


031027 


000100 


2839 


026126 


001403 




2840 


026130 


020500 




2041 


026132 


001401 




2842 


026134 


104022 




2B43 








2844 








2845 








2846 


026136 


062700 


000002 


2847 


0261 42 


077.:1 1 




2048 


026144 


010115 




2849 


026146 


031527 


000100 


2050 


026152 


001401 




2851 


026154 


104023 




2852 








2853 








2B54 








2855 


026156 


062705 


000002 


2B56 


026162 


062703 


020000 


2357 


026166 


077445 




2058 


026170 


012737 


026002 


2059 


026176 


004737 


036036 


2860 


026202 


005037 


177776 


2061 








2862 








2863 








2864 








2865 








2866 








2867 








2868 








2069 








2870 








2871 








2372 








2873 


026206 


000004 




2074 








2375 


026210 


004737 


036002 


2876 


026214 


01 2701 


077406 


2877 


026220 


01 2737 


026226 


2078 


026226 


01 0137 


172316 


2879 


026232 


01 3700 


177572 


2880 


026236 


01 0037 


177572 


2081 


026242 


01 3702 


172316 


2882 


026246 


020102 




2883 


026250 


001401 




2884 


026252 


104024 




2885 








2886 








2887 








2388 


026254 


01 2737 


026254 


2889 


026262 


01 0137 


172306 



5$: 
6$: 



BR 

MOV 

MOV 

BIT 

BEO 

CMP 

BEQ 

ERROR 



ADD 
SOB 
MOV 
BIT 
BEQ 
ERROR 



ADD 
ADD 
SOB 
MOV 
JSR 
CLR 



8$ 

#10, R2 
(CUIPDRO.RO 
(RO),#WBIT 
7$ 

R5,R0 

7$ 

22 



(S'2,R0 

R2,6$ 

R1 , {R5) 

(R5),#WBIT 

8$ 

23 



#2.R5 
#20000, R3 
'4,3$ 

#1$,$LPERR 
PC, TON 
PSW 



; "BR 3$" = 000763 

;SKIP CHECKING OTHER PDR'S-ERROR WILL SET W-BITS 
;SET LOOP COUNTER TO 8 

;LOAD ADDR. OF FIRST PDR TO BE CHECKED IN RO 
;DID W-BlT IN OTHER PDRS REMAIN CLEAR? 
; BRANCH IF YES 

;IF W-BIT SET, THEN WAS IT PDR UNDER TEST? 
; BRANCH IF YES 

;W-BIT GOT SET IN MORE THAN ONE PDR 
;FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
; "BR 3$" = 000750 

; POINT RO TO NEXT PDR TO BE CHECKED 
; LOOP UNTIL ALL 8 CHECKED FOR CLEAR W-BiT 
;WRITE TO THE PDR TESTED TO CLEAR W-BIT 
;DID WRITING PDR CLEAR THE W-BIT? 
;BRANCH IF YES 

;W-BIT DID NOT CLEAR BY WRITING THE PDR 
;FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
; "BK 3$" - 000740 

; POINT R5 TO THE NEXT PDR TO BE TESTED 
;CHANGE VIRT. ADDR TO REF. NEXT PDR 
;LOOP BACK TO 3$ UNTIL ALL 8 PDR'S TESTED 
•,RESET LOOP ON ERROR POINTER TO 1$ 
;TURN T-niT BACK ON FOR NEXT TEST 
;BACK TO KERNEL MODE BEFORE LEAVING 



iST 32 TEST "W-BIT NOT SET" 



CASES 



THIS TEST CHECKS TWO SPECIAL CASES WHERE THE W-BIT DOES 

NOT GET SET ON A WRITE. FIRST CASE IS THAT THE W-BIT 

SHOULD NOT SET IN PAGE DESCRIPTOR REG. 7 WHEN WRITING TO 

STATUS REG SRO (KERNEL PDR 7 IS USED). SECOND CASE IS THAT 

THE W-BIT IS NOT SET IF THE "DATO" IS ABORTED DUE TO AN 

ODD ADDRESS ERROR (KERNEL PDR3 S VIRTUAL ADDR 60001 ARE USED). 



« 41 « 4> «t « * iK 

TST32: SCOPE 

1$: JSR 
MOV 
MOV 

2$: MOV 

MOV 
MOV 
MOV 
CMP 
BEQ 
ERROR 



001110 3$: 



MOV 
MOV 



PC, TOFF 

#77406, R1 

#2$,$LPERR 

R1 ,KIPDR7 

SRO,RO 

RO,SRO 

KIPDR7,R2 

R1 ,R2 

3$ 

24 



#3$,$LPERR 
R1 ,KIPDR3 



TURN OFF T-BIT TRAPPING FOR THIS TEST 

PUT "W-BIT OFF" VALUE FOR PDR IN R1 

SET LOOP ON ERROR POINTER TO 2$ 

LOAD KERNEL PDR 7 TO CLEAR W-BIT 

READ PRESENT CONTENTS OF STATUS REG. 

WRITE PRESENT CONTENTS OF SRO BACK TO ITSELF 

READ CONTENTS OF KIPDR7 INTO R2 

WAS W-BIT LEFT CLEARED? 

BRANCH IF YES 

W-BIT IN KIPDR7 SET WHEN SRO WAS WRITTEN TO 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 2$" = 000765 

SET LOOP ON ERROR POINTER TO 3$ 

LOAD KERNEL PDR3 WITH 77406 TO CLEAR W-BIT 
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SEQ OOSO 



2090 


026266 


01 2 737 


026300 


2091 


026274 


005237 


060001 


2092 


026300 


1 2706 


A A i 1 AA 


21393 


026304 


1 3702 


1 72306 


2894 


0263 1 


02 01 02 




2895 


0263 1 2 


00 1 401 




2896 


0263 1 4 


1 04025 




2897 








2898 








2099 








2900 


0263 1 6 




A A O TSI 


2901 


026324 


1 2737 


0262 1 


2902 


026332 


004737 




oon^ 
































2907 
















2h09 
















2-11 








2912 








2913 








291 4 








2915 








2916 








291 7 








2918 








291 9 








2920 








292 1 








2922 








2923 








2924 








2925 


026336 


000004 




2926 








2927 


026340 


01 2700 


000600 


2928 


026344 


01 0037 


1 7 2346 


2929 


026350 


01 0037 




2930 


026354 


1 003 / 




293 1 


026360 


1 0037 




2932 


026364 


012.37 


77406 


2933 


026372 


01 2737 


077406 




n o A ^ A A 


01 2700 


060000 


2935 


026404 


01 2701 


100000 


2936 


0264 10 


01 2703 


10001 1 


2937 


025414 


01 2702 


077400 


2938 


026420 


01 2737 


026462 


2939 


026426 


01 0237 


172310 


2940 


026432 


01 0237 


177610 


2941 


026436 


01 2737 


026444 


2942 


026444 


005010 




2943 


026446 


01 3737 


177776 


2944 


026454 


005211 




2945 


026456 


104026 





000004 
001 110 



MOV 
INC 
MOV 
MOV 
CMP 
BEO 
ERROR 



MOV 
MOV 
JSR 



)»4$,ERRVEC 
60001 

^fKERSTK.KSP 

.^IPDR3,R2 

R1 ,R2 

5$ 

25 



ffTIMERR.ERRVEC 
#1$.$LPERR 
PC, TON 



ABORT 
4 



SET UP LOG. 4 TO 4$ FOR ODD ADDR. 
CAUSE ODD ADDRESS ABORT THRU LOG. 
RESTORE THE STACK POINTER 
READ KIPDR3 INTO R2 
WAS W-BIT LEFT CLEARED? 
BRANCH IF YES 

W-BIT GOT SET DURING AN ODD ADDR. 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 3$" = 000757 

RESTORE NORMAL CPU TRAP ROUTINE TO L0C.4 
RESET LOOP ON ERROR POINTER TO 1$ 
TURN T-BIT TRAPPING BACK ON 



ABORT 



THE NEXT THREE (3) TESTS CAUSE MEMORY MANAGEMENT ERRORS 

TO CHECK THE ABILITY OF STATUS REGISTER TO RECORD KT 

ERRORS AND THE ABILITY OF STATUS REGISTER 2 TO LOCK UP THE 

VIRTUAL ADDR. OF THE INSTRUCTION THAT CAUSED THF. ERROR. 

THE BITS OF SR2 ARE CHECKED AND BITS <15:13>, <6:5>, AND <3:0> 

ARE CHECKED IN SRO. SO THE SRO AND SR2 LOGIC AND THE 

KT ERROR LOGIC ARE CHECKED. 



i« sft * 1^ 41 if >«< * 



J i» i4< i» « i«< * 

'TEST 33 



NON-RESIDENT ABORT TEST (ACF=0&4) 



THIS TEST CHECKS THE ACCESS CONTROL FIELD (ACF) COMPARATOR 
LOGIC BY CAUSING NON-RESIDENT ABORTS IN BOTH KERNEL AND 
USER MODES. PDR 4 IS LOADED WITH ACF'S = 0&4 AND 
THEN PHYSICAL ADDR. 60000 IS ACCESSED TO CAUSE THE ABORT. 



;LOAD DATA FOR PAR'S INTO RO 
;MAP KERNEL PAR'S 3&4 TO 12-16K 



172306 
177605 



000250 2$: 



001 1 10 
0011 76 



MOV 


#600, RO 


MOV 


R0,KIPAR3 


MOV 


R0,KIPAR4 


MOV 


R0,UIPAR3 


MOV 


R0,UIPAR4 


MOV 


#77406. KIPDR3 


MOV 


#77406. UIPDR3 


MOV 


#60000 , RO 


MOV 


#100000, R1 


MOV 


#10001 1 ,R3 


MOV 


#77400, R2 


MOV 


#5$,MMVEC 


MOV 


R2,KIPDR4 


MOV 


R2,UIPDR4 


MOV 


#3$,$LPERR 


CLR 


(RO) 


MOV 


PSW.STMPO 


INC 


(RD 


ERROR 


26 



;MAP USER PAR'S 3S4 TO 12-16K 

MAP KERNEL PDR 3 128 BLKS, READ-WRITE 

MAP USER PDR 3 128 BLKS, READ-WRITE 

LOAD VIRTUAL ADDR. TO REFERENCE PDR3 INTO RO 

LOAD VIRTUAL ADDR. TO REFERENCE PDR4 INTO R1 

LOAD R3 WITH WHAT SRO SHOULD READ - N.R., KERf^EL, 

LOAD ACF=0 (NON-RESIDENT) PDR VALUE IN R2 

POINT MEM. MGMT. TRAP VECTOR TO 5$ BELOW 

LOAD ACF TEST VALUE INTO KIPDR4 

LOAD ACF TEST VALUE INTO UIPDR4 

SET LOOP ON ERROR POINTER TO 3$ 

CLEAR PHYS. LOC. 60000 USING PDR3 

SAVE PSW IN CASE OF ERROR 

TRY TO REF. IT USING PDR4 - SHOULD TRAP TO 5$ 
MEM. MGMT. ABORT DID NOT OCCUR 
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2946 




2947 




2948 




2949 


026460 


2950 


026462 


2951 


026466 


2952 


025470 


2953 


026472 


2954 




2955 




2956 




2957 


026474 


295B 


026502 


2959 


026510 


2960 


026514 


2961 


026516 


2962 




2963 




2964 




2965 


026520 


2966 


026524 


2967 


026530 


2968 


026532 


2969 




2970 




2971 




2972 


026534 


2973 


026542 


2974 


026550 


2975 


026552 


2976 


026556 


2977 


026564 


2978 


026566 


2379 


026572 


2980 


026574 


2981 


026600 


2982 


026604 


2983 


026610 


2984 


026612 


2985 


026616 


2986 


026624 


2987 




2988 




2989 




2990 




2991 




2992 




2993 




2994 




2995 




2996 




2997 




2998 


026632 


2999 


026634 


3000 




3001 


026634 



000425 








BR 


B$ 


062706 


000004 




5$: 


ADD 


#4,SP 


005710 








TST 


(RO) 


001401 








BEQ 


6$ 


104027 








ERROR 


27 


01 3737 


177572 


001366 


6$: 


MOV 


SRO.WASSRO 


01 3737 


177576 


001370 




MOV 


SR2,WASSR2 


020337 


001366 






CMP 


R3,WASSR0 


001401 








BEQ 


7$ 


104030 








ERROR 


30 


01 2704 


026454 




7$: 


MOV 


#4$,R4 


020437 


001370 






CMP 


R4,WASSR2 


001401 








BEQ 


8$ 


104031 








ERROR 


31 


042737 


160000 


177572 


8$: 


BIC 


#160000, SRO 


032737 


140000 


001176 




BIT 


#140000, STMPO 


001006 








BNE 


9$ 


01 2703 


100151 






MOV 


#100151 ,R3 


01 2737 


140000 


177776 




MOV 


#140000, PSW 


000715 








BR 


2$ 


022702 


077404 




9$: 


CMP 


#77404, R2 


001m07 








BEQ 


10$ 


01 2702 


077404 






MOV 


#77404, R2 


01 2703 


10001 1 






MOV 


#10001 1 ,R3 


005037 


177776 






CLR 


PSW 


000703 








BR 


2$ 


005037 


177776 




10$: 


CLR 


PSW 


012737 


026340 


001 110 




MOV 


#1$,$LPERR 


012737 


002400 


000250 




MOV 


#MGMERR,MMVEC 















FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 3$" = 000772 

BRANCH AROUND STATUS REG. CHECKS IF NO ABORT 

RESTORE STACK POINTER 

DID INSTRUCTION GET ABORTED & NOT EXECUTE 

BRANCH IF YES 

INSTRUCTION WAS NOT ABORTED, LOC. GOT CHANGED 

FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 3$" = 000764 
READ STATUS REGISTER 
READ STATUS REGISTER 2 

DID SRO REPORT NON-RESIDENT ERROR CORRECTLY? 

BRANCH IF YES 

SRO DID NOT REPORT NON-RES. ERROR CORRECTLY 

FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 3$" = 000752 

LOAD P4 WITH WHAT SR2 SHOULD READ 

DID SR2 LOCKUP RIGHT VIRTUAL ADDR. (=4$)? 

BRANCH IF YES 

SR2 DID NOT LOCK VIRTUAL ADDR. OF NON-RES. ERROR 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 3$" = 000744 

CLEAR THE ERROR BITS IN SRO 

HAS ACF=0&4 BEEN TESTED IN USER YET 

BRANCH IF YES 

LOAD R3 WITH WHAT SRO SHOULD READ - N.R.. USER. PG.4 

GO TO USER MODE 
REPEAT TEST IN USER MODE 
HAS ACF=4 BEEN TESTED YET? 
BRANCH IF YES 

THEN LOAD ACF=4 (NON-RES) PDR VALUE IN R2 

LOAD R3 WITH WHAT SRO SHOULD READ-N. R. .KERNEL. PG. 4 

GO BACK TO KERNEL MODE 

GO BACK & TEST ACF=4 IN SAME MODE 

GO BACK TO KERNEL MODE BEFORE LEAVING 

RESET LOOP ON ERROR POINTER TO 1$ 

RESTORE ADDREbS OF NORMAL MEMORY 

MANAGEMENT ERROR ROUTINE TO MMVEC 



34 READ-ONLY ABORT TEST (ACF=2) 

THIS TEST CHECKS THE ACCESS CONTROL FIELD (ACF) COMPARATOR 
LOGIC BY CAUSING READ-ONLY ABORTS IN BOTH KERNEL AND 
USER MODES. PDR 4 IS LOAD WITH ACF=2 AND THEN 
PHYSICAL ADDR. 60000 IS WRITTEN TO CAUSE THE ABORT. 



TST34: 
1$: 



012700 060000 



#60000. RO 



;KERNEL & USER PAR'S 3 & 4 AND PDR 3 
;ARE SETUP FROM LAST TEST 

jLOAD VIRTUAL ADDR. TO REFERENCE PDR3 INTO RO 



CFKTHBO POP 11/34 MEM MGNT DIAG MACY11 30A(1052) 27-JUN-78 09:33 PAG? 63 



FKTHB 


P1 1 


27-JUN-78 


09 : 27 




T34 


READ-ONLY ABORT TEST (ACFs:2) SEO 


3002 


026640 


012701 


1 00000 






MOV 


#100000, Rl 


;LOAD VIRTUAL ADDR. TO REFERENCE PDR4 INTO R1 


3003 


026644 


01 2703 


02001 1 






MOV 


#20011 ,R3 


;LOAD R3 WITH WHAT SRO SHOULD READ - R/0. KERNEL, Pa.4 


3004 


026G50 


01 2 702 


077402 






MOV 


#77402, R2 


JLOAD ACF=2 (READ-ONLY) PDR VALUE IN R2 


3005 


026654 


1 2737 


02671 6 


000250 


2$: 


MOV 


#5$,MMVEC 


; POINT MEM. MGMT. TRAP VECTOR TO 5$ BELOW 


3006 


026662 


01 0237 


1 7231 






MOV 


R2,KIPDR4 


•.LOAD ACFx2 INTO KIPDR4 


3007 


026666 


1 0237 


1 7761 






MOV 


R2,UIPDR4 


jLOAD ACF=2 INTJ UIPDR4 


3008 






026700 


001 110 




MOV 


#3$,$LPERR 


;SET LOOP ON ERROR POINTER TO 3$ 


3009 


026700 


0050 1 






3$: 


CLR 


(RO) 


; CLEAR PHYS. LOC. 60000 USING PDR3 


30 1 


026702 


1 3737 


1 77776 


001 17S 




MOV 


PSW,$TMPO 


;SAVE PSW IN CASE OF ERROR 


301 1 


0267 1 


0052 1 1 




4$: 


INC 


(R1) 


;TRY TO WRITE USING PDR4 - SHOULD TRAP TO 5$ 


301 2 


026712 


1 04026 








ERROR 


26 


;MEM. MGMT. ABORT DID NOT OCCUR 


30 1 3 
















;FOR TIGHTER SCOPE LOOP 


30 1 4 
















JREPLACE ERROR CALL WITH 


301 5 
















;"BR 3$" = 000772 


301 6 


0267 1 4 


000425 








BR 


8$ 


i BRANCH AROUND STATUS REG. CHECKS IF NO ABORT 


301 7 


0267 1 6 


062706 


000004 


S$: 


ADD 


#4,SP 


; RESTORE STACK POINTER 


301 8 


026722 


0057 1 








TST 


(RO) 


;DID INSTRUCTION GET ABORTED & NOT EXECUTE 


301 9 


026724 


00 1 40 1 








BEQ 


6$ 


{BRANCH IF YES 


3020 


026726 


1 04027 








ERROR 


27 


; INSTRUCTION WAS NOT ABORTED. LOC. GOT CHANGED 


3021 
















;FOR TIGHTER SCOPE LOOP 


3022 
















;REPLACC ERROR CALL WITH 


3023 
















;"BR 3$" = 000764 


3024 


W / OW 


01 3737 


1 77572 


001366 


6$: 


MOV 


SROtWASSRO 


;READ STATUS REG. 




UaD / *3C 


01 3737 


1 77576 


001370 




MOV 


i:R2.WASSR2 


JREAD STATUS REG. 2 


3026 


026744 


020337 


001 366 






CMP 


RS.WASSRO 


;DID SRO REPORT READ-ONLY ERROR CORRECTLY? 




026750 


00 1 40 1 








BEQ 


7$ 


; BRANCH !F YES 


3028 


026752 


1 04030 








ERROR 


30 


;SRO DID NOT REPORT R/0 ERROR CORRECTLY 


3029 
















;FOR TIGHTER SCOPE LOOP 


3030 
















J REPLACE ERROR CALL WITH 


3031 
















;"BR 3$" » 000752 


3032 


026754 


01 2704 


02671 


7SJ 


MOV 


#4$,R4 


{LOAD R4 WITH WHAT SR2 SHOULD READ 


3033 




020437 


001 370 






CMP 


R4,WASSR2 


;DID SR2 LOCKUP RIGHT VIRTUAL ADDR. (-4$)? 


3034 


026764 


00 1401 








BEQ 


8$ 


; BRANCH IF YES 


3035 


026766 


1 04031 








ERROR 


31 


;SR2 DID NOT LOCKUP VIRTUAL ADDR. OF R/0 ERROR 


3036 
















;FOR TIGHTER SCOPE LOOP 


3037 
















;REPLACE ERROR CALL WITH 


3038 
















;"BR 3$» = 000744 


3039 


026770 


042737 


1 60000 


177572 8$: 


BIC 


#160000. SRO 


JCLEAR THE ERROR BITS IN SRO 


3040 




032737 


1 40000 


001176 




BIT 


#140000, STMPO 


;HAS ACF=2 BEEN TESTED IN USER MODE? 


3041 


027004 


00 1 006 








BNE 


9$ 


•.BRANCH IF YES 


3042 


027006 


01 2703 


0201 51 






MOV 


#20151 ,R3 


;LOAD R3 WITH WHAT SRO SHOULD READ-R/O, USER, PQ.4 


3043 


0270 1 2 


01 2737 


1 40000 


177776 




MOV 


#140000, PSW 


;G0 TO USER MODE 


3044 


027020 


0007 1 5 








BR 


2$ 


; REPEAT TEST IN USER MODE 


3045 


027022 


005037 


1 77776 


9$: 


CLR 


PSW 


;G0 BACK TO KERNEL MODE BEFORE LEAVING 


3046 


027026 


01 2737 


026634 


001110 




MOV 


#1$,$LPERR 


; RESET LOOP ON ERROR POINTER TO 1$ 


3047 


027034 


01 2737 


002400 


0002S0 




MOV 


#MGMERR,MMVEC 


; RESTORE ADDRESS OF NORMAL MEMORY 


3048 
















; MANAGEMENT ERROR ROUTINE TO MMVEC. 


3049 














3050 










*TEST 


35 


TEST ILLEGAL MODE "01" 


3051 


















3052 










* 


THIS TEST CHECKS TO SEE 


THAT A 01 IN THE CURRENT MODE BITS OF THE 


3053 












PSW WHILE MEMORY MANAGEMENT IS ON IS ILLEGAL. A 


3054 










* 


MEMORY 


MANAGEMENT ABORT 


SHOULD OCCUR AND STATUS REGISTER 


3055 










♦ 


SHOULD 


REPORT NON-RESIDENT ABORT, MODE » 01, PAGE » 1 (100043). STATUS 


3056 










* 


REGISTER 2 SHOULD LOCKUP 


THE ADDRESS OF THE INSTRUCTION 


3057 












THAT LOADED THE PSW. 
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3058 








3059 








3060 


027042 


000004 




3061 


027044 


012737 


027060 


3062 


027052 


012737 


027074 


3063 


027060 


012737 


040000 


3064 


027066 


000240 




3065 


027070 


104056 




3066 








3067 








3068 








3069 


027072 


000424 




3070 


027074 


012706 


001 100 


3071 


027100 


01 2701 


100043 


3072 


027104 


013737 


177572 


3073 








3074 


0271 12 


020137 


001366 


3075 


0271 16 


001401 




3076 


027120 


104057 




3077 








3078 








3079 








3080 


027122 


012701 


027060 


3081 


027126 


013737 


177576 


3082 


027134 


020137 


001370 


3083 


027140 


001401 




3084 


027142 


104036 




3085 








3086 








3087 








3088 


027144 


042737 


160000 


3089 


027152 


012737 


002400 


3090 


027160 


012737 


027044 


3091 








3092 








3093 








3094 








3095 








3096 








3097 








3098 








3099 








3100 








3101 








3102 








3103 








3104 








3105 








3106 








3107 








3108 








3109 








3110 








31 1 1 








3112 








3113 









001110 
000250 
177776 



1$: 



J Id « * * 4> # iK 4< 

TST35: SCOPE 
MOV 
MOV 
MOV 
NOP 
ERROR 



BR 
MOV 
MOV 
MOV 

CMP 
BEQ 
ERROR 



MOV 
MOV 
CMP 
BEQ 
ERROR 



177572 
00025ti 
001110 



5$: 



BIC 
MOV 
MOV 



rt2$,$LPERR 
#3$, MMVEC 
#40000, PSW 



5$ 

#KERSTK,SP 
#100043, R1 
SRO,WASSRO 

R1 .WASSRO 

4$ 

57 



#2$,R1 

SR2,WASSR2 

R1 ,WASSR2 

5$ 

36 



#160000, SRO 
#MGMERR, MMVEC 
#1$,$LPERR 



SET LOOP ON ERROR POINTER TO 2$ 

LOAD MEM. MGMT. TRAP VECTOR WITH 3$ 

SET 01 IN PSW CURRENT MODE BITS 

FETCH OF THIS INSTRUCTION SHOULD CAUSE ABORT 

ILLEGAL MODE 01 NOT ABORTED 

FOR A TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 2$" = 000773 

BRANCH AROUND SRO & SR2 CHECKS 

RESTORE STACK POINTER 

LOAD EXPECTED CONTENTS OR SRO INTO R1 
READ CONTENTS OF SRO 

DID SRO REPORT ILLEGAL MODE CORRECTLY? 
BRANCH IF YES 

SRO DID NOT REPORT NR ABORT, PG»1 . MODE»01 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 2$" = 000757 

LOAD EXPECTED CONTENTS OF SR2 INTO R1 
READ CONTENTS OF SR2 

DID SR2 LOCKUP VIRT. ADDR OF ABORTED INST. 
BRANCH IF YES 

SR2 DID NOT LOCKUP VIRT. ADDR. OF ILL. MODE INST. 

FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 2$" = 000746 

CLEAR POSSIBLE ERROR BITS IN SRO 
RESTORE MEM. MGMT. ABORT VECTOR 
RESET LOOP ON ERROR POINTER TO 1$ 



« iji « « >ji # « Hi « 1(1 « « * iK « 



THE NEXT TWO (2) TESTS WILL OE CHECKING THE PAGE LENGTH 
COMPARATORS AND SOME MORE OF THE KT ERROR DETECTION 
AND STATUS LOGIC. THE PAGE LENGTH FIELD (PLF) IN KERNEL 
PDR 4 IS VARIED AND FOR EVERY PLF. THREE (3) VIRTUAL 
ADDRESSES ARE READ. WHILE USING BOTH UPWARD & DOWNWARD PAGE 
EXPANSION, ONE OF THOSE THREE VIRTUAL ADDRESSES WILL CAUSE A 
"PAGE LENGTH ABORT" WHILE THE OTHER TWO WON'T. 

STATUS REGISTER £ 2 ARE CHECKED WHEN THE PAGE LENGTH 



CFKTHBO PDP 11/34 MEM MGNT DUG MACV11 30A{1052) 27-aUN-78 09:33 PAGE 65 





. P11 


d UN" /O 


09-27 


















if 
















o a 
o ! Q 
















31 20 








^ ' 








31 22 








3 1 23 
















o «^ 








3 1 26 








^ 1 
















^ on 
















^1 TO 








Q 1 
















■^1 




UU UUU4 










07 7406 


T1 TR 


0271 76 


01 2737 






027204 


01 2700 






0272 1 




A A Ayi AC 




0272 1 4 


1 2737 


027406 




027222 


2f oZ 




^ t 






027234 


"Z ' 


027234 


ni 7nR 


AA 1 1 AA 
WW 1 1 WW 






01 1001 




^iAK 


027242 


AC O *? A 


A A A 1 AA 
wUU 1 WW 




027246 


^■7aI 


0^ /2b4 






01 2706 


00 1 1 00 


o A 

Ti^n 




01 1 uOI 






027262 


062700 


0001 00 






020027 


1 1 7700 






00 1470 




Ol c 


0272 74 


9 1 ^Z?Z 


02731 


rt 1 CO 


027302 


1 2737 


02731 6 


Ti 


0273 1 


^'aIatq 






02731 2 


1 04033 




^1 








T 1 


















0273 1 4 


000424 




31 59 






AA 1 1 AA 


3 1 60 


027322 


01 3737 


1 77572 


3161 


027330 


01 3737 


177576 


3162 


027336 


01 2702 


040011 


3163 


027342 


020237 


001366 


3164 


027346 


001401 




3165 


027350 


104034 




3166 








3167 








3168 








3169 


027352 


012703 


027310 



T35 TEST ILLEGAL MODE "01" 

» ABORT DOES OCCUR TO SEE THAT THE ABORT IS REPORTED AND THAT 

» THE VIRTUAL ADDRESS OF THE INSTRUCTION THAT CAUSED THE ABORT 

IS LOCKED UP. 



SEQ 0064 



*TEST 36 PAGE LENGTH FAULTS-UPWARD EXPANSION 



THIS TEST VARIES THE PAGE LENGTH FIELD (PLF) IN KERNEL PDR 4 
FROM 1 TO 177 AND FOR EACH PLF, THREE VIRTUAL ADDRESSES (VBA'S) 
ARE ACCESSED. WHEN VBA <12:6> IS LESS THAN OR EQUAL TO PDR <14J8> 
NO ABORT SHOULD OCCUR. WHEN VBA <12:6> IS GREATER THAN PDR <14:8>, 
A PAGE LENGTH ABORT SHOULD OCCUR AND BE REPORTED BY SRO & SR2. 
THE PAGE EXPANSION DIRECTION IN THIS TEST IS UPWARD. (THE ED BIT 
(BIT 3) OF PDR 4=0). 



172306 
172312 



4$: 



TST36: SCOPE 
1 $ : MOV 
MOV 
MOV 
MOV 

2$: MOV 
MOV 
MOV 

3$: MOV 
MOV 
ADD 
MOV 
MOV 
MOV 
ADD 
CMP 
BEQ 
MOV 
MOV 
MOV 
ERROR 



BR 

MOV 

MOV 

MOV 

MOV 

CMP 

BEQ 

ERROR 



#77406, KIPDR3 

<S'77406,KIPDR5 

#100000, RO 

#406, R4 

#9$,MMVEC 

R4,KIPDR4 

#3$,$LPERR 

*KERSTK,KSP 

(R0),R1 

#100,R0 

if4$,$LPERR 

/SiKERSTK.KSP 

(RO) ,R1 

fflOO.RO 

RO, #117700 

10$ 

#5$,$LPERR 
#6$,MMVEC 
(RO) ,R1 
33 



8$ 

#KERSTK,KSP 

SRO,WASSRO 

SR2,WASSR2 

#40011 ,R2 

R2,WASSR0 

7$ 

34 



#5§,R3 



MAKE SURE PDR3 IS DESCRIBED AS R/W 

MAKE SURE PDR5 IS DESCRIBED AS R/W 

LOAD VIRTUAL AODR. TO SELECT PDR4 INTO RO 

LOAD FIRST PDR VALUE IN R4 (PLF«1, ACF=6) 

SETUP M.M. TRAP VECTOR FOR UNEXPECTED ABORTS 

LOAD KIPDR4 WITH PAGE LENGTH VALUE 

SET LOOP ON ERROR POINTER TO 3$ 

MAKE SURE STACK POINTER IS ALL SET UP 

ACCESS VIRTUAL ADDR. (VBA < PLF - NO ABORT) 

FORM NEXT VIRTUAL ADDRESS IN RO 

SET LOOP ON ERROR POINTER TO 4$ 

MAKE SURE STACK POINTER IS ALL SET UP 

ACCESS VIRTUAL ADDR. (VBA = PLF - hlo ABORT) 

FORM NEXT VIRTUAL ADDR IN RO 

HAVE ALL PLF'S BEEN TESTED YET? 

BRANCH IF ALL VBA'S & PLF'S HAVE BEEN USED 

SET LOOP ON ERROR POINTER TO 5$ 

SETUP M.M. TRAP VECTOR FOR EXPECTED ABORT 

ACCESS VIRTUAL ADDR. (VBA > PLF - ABORT TO 6$) 

EXPECTtD PAGE LENGTH ABORT DID NOT OCCUR 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 5$" = 000776 

BRANCH AROUND ABORT CHECKS 

RESTORE STACK POINTER FOLLOWING ABORT 

READ M.M. STATUS REG. 

READ M.M. STATUS REG. 2 

PUT EXPECTED SRO CONTENTS IN R2 

DID SRO REPORT PG. LENGTH ABORT. PAGE 4, KERNEL? 
BRANCH IF YES 

SRO DID NOT REPORT PG. LENGTH ABORT CORRECTLY 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 5$" = 000757 

PUT EXPECTED SR2 CONTENTS IN R3 



CFKTHBO PDP 11/34 MEM MGNT DIAG MACY11 30A(10S2) 27-UUN-78 09:33 PACT 66 
CFKTHB.P11 27-JUN-78 09:27 T36 PAGE LENGTH FAULTS-UPWARD EXPANSION 



SEQ 0065 



3170 


027356 


020337 


001370 


3171 


027362 


001401 




3172 


027364 


104035 




3173 








3174 








3175 








3176 


027366 


042737 


160000 


3177 


027374 


062704 


000400 


3178 


027400 


162700 


000100 


3179 


027404 


000703 




3180 








3181 


027406 


01 2637 


001356 


3182 


027412 


01 2637 


001360 


3183 


027416 


01 3' 37 


177572 


3184 


027424 


01 3737 


177576 


3185 


027432 


042737 


160000 


3185 


027440 


104032 




3187 








3188 








3189 








3190 


027442 


01 3746 


001360 


3f9l 


027446 


01 3746 


001356 


3192 


027452 


000002 




3193 








3194 


027454 


012737 


027170 


3195 


027462 


012737 


002400 


3196 








3197 








3198 








3199 








3200 








3201 








3202 








3203 








3204 








3205 








3206 








3207 








3208 








3209 








3210 








321 1 


027470 


000004 




3212 


027472 


01 2700 


1 17700 


3213 


027476 


01 2704 


077016 


3214 


027502 


01 2737 


027674 


3215 


027510 


01 0437 


172310 


3216 


027514 


01 2737 


027522 


3217 


027522 


01 2706 


001 100 


3213 


027526 


01 1001 




3219 


027530 


162700 


000100 


3220 


027534 


01 2737 


027542 


3221 


027542 


012706 


001100 


3222 


027546 


01 1001 




3223 


027550 


162700 


000100 


3224 


027554 


020027 


100000 


3225 


027560 


001470 





177572 8$: 



9$: 



001366 
001370 
177572 



001110 
000250 



CMP 
BEQ 
ERROR 



BIC 
ADD 
SUB 
BR 

MOV 
MOV 
MOV 
MOV 
BIC 
ERROR 



MOV 
MOV 
RTI 

MOV 
MOV 



R3,WAS5R2 

8$ 

35 



#160000, SRO 
#400, R4 
#100, RO 
2$ 

(KSP)+,TRAPPC 

(KSP)+,TRAPPS 

SRO.WASSRO 

SR2,WASSR2 

#160000, SRO 

32 



TRAPPS,-(KSP) 
TRAPPC,-{KSP) 



#1S,$LPERR 
#MGMERR,MMVEC 



DID SR2 LOCKUP VIRT. ADDR. OF ABORTED INSTRUCTION? 

BRANCH IF YES 

SR2 DID NOT LOCKUP VIRT. ADDR. OF ABORT CORRECTLY 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 5$" = 000751 

CLEAR ERROR BITS IN SRO 

FORM NEXT PLF VALUE FOR KIPDR4 

FORM FIRST VIRT. ADDR FOR THAT PLF VALUE 

BRANCH BACK AND ACCESS 3 VBA'S FOR 

THE PLF VALUE JUST FORMED 

SAVE PC a PS OF TRAP 

SAVE CONTENTS OF SRO FOR ERROR 
SAVE CONTENTS OF SR2 FOR ERROR 
CLEAR ERROR BITS IN SRO 

GOT PG. LENGTH ABORT BEFORE IT WAS EXPECTED 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

A "NOP" = 000240 

PUT PC & PS OF TRAP ON STACK 

RETURN FROM UNEXPECTED ABORT 

RESET LOOP ON ERROR POINTER TO IS 
RESTORE NORMAL M.M. TRAP HANDLER 
ADDRESS TO M.M. TRAP VECTOR 



•fTEST 37 PAGE LENGTH FAULTS-DOWNWARD EXPANSION 

* 

* THIS TEST VARIES THE PAGE LENGTH FIELD (PLF) IN KERNEL PDR4 

« FROM 176 TO AND FOR EACH PLF, THREE VIRTUAL ADDRESSES (VBA'S) 

* ARE ACCESSED. WHEN VBA <12:6> IS GREATER THAN OR EQUAL TO PDR <14:8> 

* NO PAGE ABORT SHOULD OCCUR. WHEN VBA <12:6> IS LESS THAN PDR <14:8> 
« A PAGE LENGTH ABORT SHOULD OCCUR AND BE REPORTED BY SRO & SR2. 

* THE PAGE EXPANSION DIRECTION IN THIS TEST IS DOWNWARD, (THE ED BIT 

* (BIT 3) OF PDR4»1). 



« i«i >|i 4> « >|< 4: « iX >X « « 



« « « * <ti * « «< 



000250 
001110 



TST37: 


SCOPE 






1$: 


MOV 


#1 17700, RO 


;LOAD VIRTUAL ADDR. TO SELECT PDR4 INTO RO 




MOV 


#77016, R4 


JLOAD FIRST PDR VALUE IN R4 ( PLF=1 76, ACFsS) 


as: 


MOV 


#9$,MMVEC 


; SETUP M.M. TRAP VECTOR FOR UNEXPECTED ABORTS 




MOV 


R4,KIPDR4 


;LOAD KIPDR4 WITH PAGE LENGTH VALUE 




MOV 


#3$,$LPERR 


;SET LOOP ON ERROR POINTER TO 3$ 


3$: 


MOV 


#KERSTK,KSP 


.-MAKE SURE STACK POINTER IS ALL SET UP 




MOV 


(RO) ,R1 


;ACCESS VIRTUAL ADDR. (VBA > PLF - NO ABORT) 




SUB 


#100, RO 


;FORM NEXT VIRTUAL ADDRESS IN RO 




MOV 


#4$,$LPERR 


JSET LOOP ON ERROR POINTER TO 4$ 




MOV 


#KERSTK,KSP 


;MAKE SURE STACK POINTER IS ALL SET UP 




MOV 


(RO) ,R1 


lACCESS VIRTUAL ADDR. (VBAsPLF - NO ABORT) 




SUB 


#100, RO 


;FORM NEXT VIRTUAL ADDR. IN RO 




CMP 


RO, #100000 


;HAVE ALL PLF'S BEEN TESTED YET? 




BEQ 


10S 


1 BRANCH IF ALL VBA'S & PLF'S HAVE BEEN USED 
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SEQ 0068 



3226 
3227 
3228 
3229 
3230 
3231 
3232 
3233 
3234 
3235 
3236 
3237 
3238 
3239 
3240 
3241 
3242 
3243 
3244 
3245 
3246 
3247 
3248 
3249 
3250 
3251 
3252 
3253 
3254 
3255 
3256 
3257 
3258 
3259 
3260 
3261 
3262 
3263 
3264 
3265 
3266 
3267 
3268 
3269 
3270 
3271 
3272 
3273 
3274 
3275 
3276 
3277 
3278 
3279 
3280 
3281 



027562 012737 027576 001 ItO 

027570 012737 027604 000250 

027576 01 1001 5$: 

027600 104033 



027602 
027604 
027610 
027616 
027624 
027630 
027634 
027636 



027640 
027644 
027650 
027652 



000424 
01 2706 
01 3737 
01 3737 
01 2702 
020237 
001401 
104034 



012703 
020337 
001401 
104035 



027654 
027662 
027666 
027672 

027674 
027700 
027704 
027712 
027720 
027726 



042737 
162704 
062700 
000703 

012637 
01 2637 
013737 
013737 
042737 
104032 



001 100 
177572 
177576 
040011 
001366 



027576 
001370 



160000 
000400 
000100 



001356 
001360 
177572 
177576 
160000 



001366 
001370 



7$: 



001366 
001370 
177572 



027730 013746 001360 

027734 013746 001356 

027740 000002 

027742 012737 027472 001110 10$: 

027750 012737 002400 000250 



MOV 
MOV 
MOV 
ERROR 



BR 

MOV 

MOV 

MOV 

MOV 

CMP 

BEQ 

ERROR 



MOV 
CMP 
BEQ 
ERROR 



BIC 
SUB 
ADD 
BR 

MOV 
MOV 
MOV 
MOV 
BIC 
ERROR 



MOV 
MOV 
RTI 

MOV 
MOV 



#5$,$LPERR 
<i^6$,MMVEC 
fRO) ,R1 
43 



8$ 

fCKERSTK.KSP 

SRO.WASSRO 

SR2,WASSR2 

#40011 ,R2 

R2.WASSR0 

7$ 

34 



4'5$,R3 

R3,WASSR2 

8$ 

35 



#160000, SRO 
#400, R4 
#100, RO 
2$ 

(KSP)+,TRAPPC 

(KSP)+,TRAPPS 

SRO,WASSRO 

SR2,WAS5R2 

#160000, SRO 

32 



TRAPPS,-(KSP) 
TRAPPC,-(KSP) 



#1$,$LPERR 
#MGMERR,MMVEC 



;SET LOOP ON ERROR POINTER TO 5$ 

; SETUP M.M. TRAP VECTOR FOR EXPECTED ABORT 

;ACCESS VIRTUAL ADDR. (VBA < PLF - ABORT TO 6$) 

; EXPECTED PAGE LENGTH ABORT DID NOT OCCUR 

;FOR TIGHTER SCOPE LOOP 

JREPLACE ERROR CALL WITH 

; "BR 5$" « 000776 

; BRANCH AROUND ABORT CHECKS 

; RESTORE STACK POINTER FOLLOWING ABORT 

•.READ M.M. STATUS REG. 

;READ M.M. STATUS REG. 2 

;PUT EXPECTED SRO CONTENTS IN R2 

;DID SRO REPORT PG. LENGTH ABORT, PG. 4. KERNEL? 
; BRANCH IF YES 

;SRO DID NOT REPORT PG. LENGTH ABORT CORRECTLY 

;FOR TIGHTER SCOPE LOOP 

JREPLACE ERROR CALL WITH 

; "BR 5$" = 000757 

;PUT EXPECTED SR2 CONTENTS IN R3 

;DID SR2 LOCKUP VIRT. ADDR. OF ABORTED INSTRUCTION? 

; BRANCH IF YES 

;SR2 DID NOT LOCKUP VIRT. ADDR. OP ABORT CORRECTLY 

;FOR TIGHTER SCOPE LOOP 

;REPLACE ERROR CALL WITH 

;"BR 5$" = 000751 

;CLEAR ERROR BITS IN SRO 

;FORM NEXT PLF VALUE FOR KIPDR4 

JFORM FIRST VIRT. ADDR. FOR THAT PLF VALUE 

; BRANCH BACK AND ACCESS 3 VBA'S FOR 

;THE PLF VALUE UUST FORMED 

;SAVE PC & PS OF TRAP 

;SAVE CONTENTS OF SRO FOR ERROR 
;SAVE CONTENTS OF SR2 FOR ERROR 
•.CLEAR ERROR BITS IN SRO 

;GOT PG. LENGTH ABORT BEFORE IT WAS EXPECTED 

;FOR TIGHTER SCOPE LOOP 

{REPLACE ERROR CALL WITH 

;A "NOP" = 000240 

;PUT PC & PS OH TRAP ON STACK 

; RETURN FROM UNEXPECTED ABORT 

; RESET LOOP ON ERROR POINTER TO 1$ 
; RESTORE NORMAL M.M. TRAP HANDLER 
; ADDRESS TO M.M. TRAP VECTOR 



,i,tnti*** ************************ **i*m*** 
TEST 40 SR2 BIT TEST 



**IH^*^**0i^*rtir^0*^l*iL*tL**** 



THIS TEST CHECKS THE BITS IN MEMORY MANAGEMENT REGISTER 2 BY 

CAUSING "READ-ONLY ABORTS" AT VIRTUAL ADDRESSES BETWEEN 100000 

TO 111000 (PHYSICAL ADDRESSES 060000-071000). KIPDR4 IS USED TO EXECUTE 

THE FOLLOWING FOUR WORDS OF CODE WHICH ARE MOVED THRU MEMORY: 

010727 MOV PCt(PC)-f ;THIS INSTRUCTION SHOULD CAUSE A R/0 ABORT 



CFKTHBO PDP 11/34 MEM MGNT DIAG MACY11 30A(1052) 27-JUN-78 09:33 PAGE 68 
CFKTHB.P11 27-JUN-78 09:27 T40 SR2 BIT TEST 



SEO 0067 



3282 










3283 










3284 










3285 










3286 










3287 










3288 


027756 


000004 






3289 


027760 


01 2737 


000600 


172346 


3290 


027766 


012737 


000600 


172350 


3291 


027774 


01 2737 


077406 


172306 


3292 


030002 


01 2737 


077402 


172310 


3293 


030010 


01 2700 


060000 




3294 


030014 


01 2701 


100000 




3295 


030020 


012737 


030054 


000250 


3296 


030026 


012737 


030034 


001110 


3297 


030034 


01 2720 


010727 




3298 


030040 


005020 






3299 


030042 


01 2720 


000137 




3300 


030046 


01 2710 


030054 




3301 


030052 


01 0107 






3302 


030054 


012706 


001100 




3303 


030060 


013737 


177576 


001370 


3304 


030086 


020137 


001370 




3305 


030072 


001401 






3306 


030074 


104036 






3307 










3308 










3309 










3310 


030076 


042737 


160000 


177572 


3311 


030104 


162700 


000004 




3312 


0301 10 


062701 


000002 




3313 


0301 14 


020127 


111002 




3314 


030120 


103745 






3315 










3316 


030122 


012737 


027760 


001110 


3317 


030130 


012737 


077406 


172310 


3318 


030136 


012737 


002400 


000250 


3319 










3320 










3321 











000000 
000137 JMP 
(ADDR. OF 3$) 



;ITS VIRTUAL ADDR. SHOULD BE LOCKED UP IN SR2 

;THIS INSTRUCTION IS ALSO MOVED THRU MEMORY 

;IN CASE A R/0 ABORT DOES NOT OCCUR. 

;IN WHICH CASE SR2 WILL NOT CONTAIN CORRECT ADDR. 



2$: 



TST40: SCOPE 
1 $ : MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
CLR 
MOV 
MOV 
MOV 
MOV 
MOV 
CMP 
BEQ 
ERROR 



BIC 
SUB 
ADD 
CMP 
BLO 

MOV 
MOV 
MOV 



!t,**'/^*0'i),Jt:**<*********** 



#600,KIPAR3 
#600,KIPAR4 
#77406, KIPDR3 
#77402, KIPDR4 
#60000, RO 
#100000, R1 
#3$,MMVEC 
#2$,$LPERR 
#010727, (R0)+ 
(R0) + 

#000137, (R0)+ 

#3$,(R0) 

R1 .PC 

#KERSTK,KSP 

SR2,WASSR2 

R1 ,WASSR2 

4$ 

36 



#160000. SRO 

#4.R0 

#2,R1 

R1 ,#111002 
2$ 

#1$,$LPERR 
#77406, KIPDR4 
#MQljlERR,MMVEC 



BE SURE PAR3 IS MAPPED TO 12-16K 

BE SURE PAR4 IS MAPPED TO 12-16K 

MAP PAGE 3 128 BLOCKS. R/W 

MAP PAGE 4 128 BLOCKS, READ-ONLY 

LOAD RO WITH VIRTUAL ADDR. WHICH USES PDR3 

LOAD R1 WITH VIRTUAL ADDR. WHICH USES PDR4 

SET M.M. TRAP VECTOR TO 3$ 

SET LOOP ON ERROR POINTER TO 2$ 

LOAD "MOV PC,(PC)+" INSTRUCTION AT ADDR. 

REACHED THRU PDR/PAR 4. 
LOAD "JMP @!#3$" INSTRUCTION AT VIRT. ADDR. 

IN CASE R/0 VIOL. DOES NOT ABORT 
TRANSFER PROGRAM EXECUTION TO "PAGE 4 INSTRUCTIONS" 
RESTORE STACK POINTER 
READ CONTENTS OF STATUS REG 2 

WAS ADDR. OF "RELOCATED - R/0 ABORT" LOCKED UP? 
BRANCH IF YES 

SR2 DID NOT LOCK UP VIRTUAL ADDR. OF R/O VIOL. 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 2$" = 000757 

CLEAR THE ERROR BITS IN SRO 

RESET RO TO POINT TO NEXT VIRT. ADDR. TO LOAD 
FORM VIRTUAL ADDR. THAT SHOULD BE LOCKED UP NEXT 
HAVE ALL VBA'S 100000-111000 BEEN TESTED? 
BRANCH IF NO 

•.RESET LOOP ON ERROR POINTER TO 1$ 
; RESTORE PDR4 TO R/W ACCESS 
; RESTORE ADDRESS OF NORMAL M.M. 
{TRAP HANDLER TO M.M. VECTOR 



CFHTHBO PDP 11/34 MEM WiGNT DIAG f^ACYtl 30A(10S2) 27-JUN-78 09:33 PAGC 69 
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SEQ ooee 



3322 
3323 
3324 
3325 
3326 
3327 
3328 
3329 
3330 
3331 
3332 
3333 
3334 
3335 
3336 
3337 
3338 
3339 
3340 
3341 
3J42 
3343 
3344 
3345 
3346 
3347 
3348 
3349 
3350 
3351 
3352 
3353 
3354 
3355 
3356 
3357 
3358 
3359 
3360 
3361 
3362 
3363 
3364 
3365 
3366 
3367 
3368 
3369 
3370 
3371 
3372 
3373 
3374 
3375 
3376 
3377 



030144 
0301 46 
030154 
030162 
0301 70 
0301 76 
030204 
030210 
030214 
030216 



030220 
030226 
030234 
030240 
030244 
030246 



030250 
030256 
030264 
030270 
030274 
030300 
030306 
030314 
030322 
030326 
030332 
030340 
030346 
030354 
030356 
030362 
030370 
030372 



000004 
01 2737 
01 2737 
01 2737 
01 2737 
01 3737 
01 2701 
020137 
001401 
104041 



01 2737 
01 3737 
01 2701 
020137 
001401 
104041 



01 2737 
01 2737 
005037 
005237 
01 2706 
01 3737 
01 3737 
01 2737 
005237 
01 2706 
01 3737 
01 3737 
022737 
001402 
005237 
023737 
001402 
005237 



*TEST 



41 



MORE CHECKS OF SRO & SR2 



THIS TEST PERFORMS SOME ADDITIONAL CHECKS OF THE SRO & SR2 LOGIC. 
FIRST IT CHECKS THAT SR2 "TRACKS" ALONG ACTING AS A VIRTUAL ADDRESS 
PROGRAM COUNTER. ALSO SRO S 5R2 ARE LOCKED UP BY A PAGE LENGTH 
ABORT, THEN WITHOUT CLEARING SRO'S ERROR BITS. A R/0 ABORT IS CAUSED. 
SRO & SR2 SHOULD NOT BE CHANGED BY THE SECOND ABORT AND THE 
INFORMATION ABOUT THE PAGE LENGTH ABORT- SOULD STILL BE LOCKED UP. 



000600 
000406 
077402 
030176 
177576 
030176 
001370 



030226 
177576 
030226 
001370 



030256 
030274 
001200 
100500 
001 100 
177572 
177576 
030326 
120000 
001 100 
177572 
177576 
001 176 

001200 
001202 





• * 


IN ADDITION A "RESET" 


IS 


EXECUTED TO VERIFY THAT SRO IS CLEARED 




; * 


AND SR2 


IS UNLOCKED BY 


A 


RESET. AFTER MEMORY MANAGEMENT IS TURNED 




; * 


SR2 IS 


CHECKED TO SEE 


THAT IT IS TRACKING AGAIN. 




f * 






TST41 : 


SCOPE 








1 72352 


1S: 


MOV 


^^600 KIPAR5 




;MAP KERNEL PAGE 5 TO 12-16K 


172310 




MOV 


^406,KIPDR4 




SETUP PDR4 FOR PAGE LENGTH ABORT 


172312 




MOV 


#77402, KIPDR5 




SETUP PDR5 FOR R/0 ABORT 


001 1 10 




MOV 


#2$ , SLPERR 




SET LOOP ON ERROR POINTER TO 2S 


001370 


3$: 


MOV 


SR2 , WASSR2 




READ SR2 TO SEE IF ITS TRACKING 






MOV 


#2$,R1 




PUT EXPECTED VIRTUAL PC IN R1 






CMP 


-11 .WASSRS 




DID SR2 CONTAIN VIRTUAL PC AT 2$? 






BEQ 


3$ 




BRANCH IF YES 






ERROR 


41 




SR2 NOT TRACKING CORRECTLY 












FOR TIGHTER SCOPE LOOP 












REPLACE ERROR CALL WITH 












"BR 2$" = 000767 


001 110 


3$. 


MOV 


#4$, SLPERR 




SET LOOP ON ERROR POINTER TO 4$ 


001370 


4$: 


MOV 


SR2,WASSR2 




READ SR2 TO SEE IF ITS TRACKING 






MOV 


#4$,R1 




PUT EXPECTED VIRTUAL PC IN R1 






CMP 


R1 ,WASSR2 




DID SR2 CONTAIN VIRTUAL PC AT 4$ 






BEQ 


5S 




BRANCH IF YES 






ERROR 


41 




SR2 NOT TRACKING CORRECTLY 












FOR TIGHTER SCOPE LOOP 












REPLACE ERROR CALL WITH 












"BR 4$" = 000767 


001 1 10 


5S: 


MOV 


#6$, SLPERR 




SET LOOP ON ERROR POINTER TO 6$ 


000250 


6$: 


MOV 


#7$,MMVEC 




PUT ADDRESS OF 7$ IN M.M. TRAP VECTOR 






CLR 


STMPI 




CLEAR ERROR INDICATOR 






INC 


##100500 




CAUSE PAGE LENGTH ABORT - TRAP TO 7$ 




7S: 


MOV 


#KERSTK,KSP 




RESTORE STACK POINTER AFTER ABORT 


001 1 76 




MOV 


SRO.STMPO 




SAVE SRO'S INFORMATION ON PG. LGTH. ABORT 


001202 




MOV 


SR2,$TMP2 




SAVE SR2'S INFORMATION ON PG. LGTH. ABORT 


000250 




MOV 


#8S,MMVEC 




PUT ADDRESS OF 8$ IN M.M. TRAP VECTOR 






INC 


§"#120000 




CAUSE R/0 ABORT - TRAP TO 8S 




8$: 


MOV 


#KERSTK,KSP 




RESTORE STACK POINTER AFTER ABORT 


001366 




MOV 


SRO.WASSRO 




READ SRO FOLLWOING SECOND KT ABORT 


001370 




MOV 


SR2,WAS5R2 




READ SR2 FOLLOWING SECOND KT ABORT 


001366 




CMP 


STMPO.WASSRO 




IS SRO STILL HOLDING INFO ON FIRST ABORT? 






BEQ 


9S 




BRANCH IF YES 






INC 


STMPI 




SET ERROR INDICATOR 


001370 


9S: 


CMP 


$TMP2,WASSR2 




DOES SR2 STILL HOLD PC OF FIRST ABORT? 






BEQ 


10$ 




BRANCH IF YES 






INC 


STMPI 




SET ERROR INDICATOR 



CFKTHBO PDP 11/34 MEM MGNT DIAG MACY11 30A(1052) 27-iJUN-78 09:33 PAGE 70 
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SEQ 0069 



3378 
3379 
3380 
3381 
3382 
3383 
3384 
3385 
3386 
3387 
3388 
3389 
3390 
3391 
3392 
3393 
3394 
3395 
3396 
3397 
3398 
3399 
3400 
3401 
3402 
3403 
3404 
3405 
3406 
3407 
3408 
3409 
3410 
341 1 
3412 
3413 
3414 
3415 
3416 
3417 
3418 
3419 
3420 
3421 
3422 
3423 
3424 
3425 
3426 
3427 
3428 
3429 
3430 
3431 
3432 
3433 



030376 
030402 
030404 



030406 
030412 
030414 
030422 
030426 
030430 
030434 
030442 
030450 
030452 
030456 
030462 
030464 



030466 
030472 
030500 
030504 
030510 
030512 



030514 
030522 
030530 
030536 
030542 
030546 
030552 
030560 
030566 



030570 
030574 
030600 
030604 



005737 
001401 
104037 



005037 
000005 
01 3737 
005737 
001402 
005237 
01 3737 
022737 
001402 
005237 
005737 
001401 
104040 



005237 
013737 
012701 
020137 
001401 
104041 



01 2737 
01 2737 
01 2737 
005037 
005237 
005237 
01 3737 
01 3737 
104065 



005C^37 
01 2706 
005737 
100413 



030574 
077400 
030536 
001200 
130000 
001200 
177572 
177576 



001200 
001 100 
177572 



11$: 



177572 
001366 

001200 
177576 
030434 

001200 
001200 



177572 
177576 
030472 
001370 



001370 
001370 



14$: 
15$: 



TST 
BEQ 
ERROR 



CLR 

RESET 

MOV 

TST 

BEQ 

INC 

MOV 

CMP 

BEQ 

INC 

TST 

BEQ 

ERROR 



INC 
MOV 
MOV 
CMP 
BEQ 
ERROR 



STMPI 

11$ 

•^7 



STMPI 



SRO.WASSRO 
WASSRO 
12$ 
STMPI 

SR2,WASSR2 

#12$,WASSR2 

13$ 

$TMP1 

$TMP1 

14$ 

40 



SRO 

SR2,WA5SR2 
#15$, R1 
R1 ,WASSR2 
16$ 
41 



J Itlljl « # « « « >i! It! 



WERE SRO OR SR2 CHANGED BY A SECOND ABORT? 
BRANCH IF NO 

ONE OF STATUS REGS. CHANGED BY SECOND ABORT 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 6$" = 000726 

CLEAR ERROR INDICATOR 

EXECUTE A RESET, APPLYING AN "INIT" 

READ SRO 

WAS SRO CLEARED BY THE RESET? 
BRANCH IF YES 

SRO NOT CLEARED BY A RESET 
READ SR2 

WAS SR2 UNLOCKED BY A RESET? 
BRANCH IF YES 

SR2 NOT UNLOCKED BY A RESET 

WERE SRO a SR2 BOTH "RESET" BY A RESET? 

BRANCH IF YES 

SRO OR SR2 NOT "RESET" BY A RESET 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 6$" = 000676 

TURN MEMORY MANAGEMENT BACK ON 

READ SR2 TO SEE IF ITS TRACKING AGAIN 

PUT EXPECTED VIRTUAL PC IN R1 

DID SR2 CONTAIN VIRTUAL PC AT 15S 

BRANCH IF YES 

SR2 NOT TRACKING CORRECTLY 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 6$" = 000663 



ALL CODE WITH A ' ;+ ' DESIGNATION IN THE COMMENT INDICATES THAT IT HAS BEEN 
ADDED TO THE ORIGINAL REV OF THIS DIAGNOSTIC. THESE ENHANCEMENTS OR CORRECTIONS 
ARE MADE BY THE PRODUCT ENHANCEMENT GROUP (DIAGNOSTICS). 



000250 
172312 
001 110 



001366 
001370 



17$: 
20$: 



■ I|ii|ii|r4<4i4iitc4ii<i**4i4<i(!4ii(i4i4r4<*4i4>4iiti4i*4i4i4i 



MOV 


#21$,MMVEC 


;-4-SET UP KTVEC FOR NON-RESIDENT ABORT 


MOV 


#77400, KIPDR5 


;+SET UP KIPDR5 FOR NR ABORT 


MOV 


#17$, SLPERR 


;+SET LOOP ON ERROR POINTER 


CLR 


$TMP1 


;+CLEAR ERROR INDICATOR 


:nc 


$>#130000 


;+CAUSE A NON-RESIDENT ABORT 


INC 


$TMP1 


;+SET ERROR INDICATOR 


MOV 


SRO.WASSRO 


;+READ SRO 


MOV 


SR2,WASSR2 


;+READ SR2 


ERROR 


65 


;+NON-RESIDENT ABORT DID NOT OCCUR 



21$: 
22$: 



CLR $TMP1 ;-t-CLEAR ERROR INDICATOR 

MOV #KERSTK,KSP ;+RESTORE KERNEL STACK POINTER 

TST SRO ;+TEST FOR THE NR ABORT IN SRO (BIT 15) 

BMI 23$ i-t-lF SET BRANCH 
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SE9 0^70 



3^134 


030606 


005237 


001200 






INC 


$TMP1 


;4-SET ERROR INDICATOR 


3435 


030612 


01 3737 


177572 


001366 




MOV 


SRO.WASSRO 


;-4-READ SRO 


3436 


030620 


01 3737 


177576 


001370 




MOV 


SR2,WASSR2 


;+READ SR2 


3437 


030626 


104066 








ERROR 


66 


•.+NR ABORT ERROR DID NOT SET IN SRO (BIT 15) 


3438 


















3439 


















3440 


030630 


005037 


001200 






CLR 


$TMP1 


;+CLEAR ERROR INDICATOR 


3441 


030634 


023727 


177576 


030542 


33$: 


CMP 


SR2.#20$ 


;+TEST THAT SR2 FROZE TO THE VIRTUAL 


3442 
















;+ADDRESS OF THE NR ABORT INSTR. 


3443 


030642 


001413 








BEQ 


24$ 


J+IF EQUAL BRANCH 


3444 


030644 


005237 


001200 






INC 


$TMP1 


;+ELSE ERROR 


3445 


030650 


013737 


177572 


00136e 




MOV 


SRO.WASSRO 


;+READ SRO 


3446 


030656 


013737 


177576 


001370 




MOV 


SR2,WASSR2 


;+READ SR2 


3447 


030664 


104067 








ERROR 


67 


;4-SR2 DID NOT CONTAIN THE CORRECT ADDRESS 


3448 


















3449 


















3450 


030666 


005037 


001200 






CLR 


$TMP1 


;+CLEAR ERROR INDICATOR 


3451 


030672 


01 2737 


030732 


000250 


34$: 


MOV 


#25$,MMVEC 


I+SET KTVEC FOR 2ND NR ABORT 


3452 


030700 


005237 


130000 






INC 


##130000 


;+CAUSE ABORT 


3453 


030704 


005237 


001200 






INC 


$TMP1 


;+SET ERROR INDICATOR 


3454 


030710 


013737 


177572 


001366 




MOV 


SRO.WASSRO 


;+READ SRO 


3455 


030716 


013737 


177576 


001370 




MOV 


SR2,WASSR2 


;+READ SR2 


3456 


030724 


104070 








ERROR 


70 


;+2ND NR ABORT DID NOT OCCUR 


3457 


















3458 


















3459 


030726 


005037 


001200 






CLR 


$TMP1 


;+CLEAR ERROR INDICATOR 


3460 


030732 


012706 


001 100 




25$: 


MOV 


*KERSTK,KSP 


;+RESTORE KERNEL STACK 


3461 


030736 


013737 


177576 


001370 




MOV 


SR2,WASSR2 


;+READ SR2 


3462 


030744 


023727 


001370 


030543 




CMP 


WASSR2,#20$ 


;+TEST SR2 FOR VIRTUAL ADDRESS OF 


3463 
















;+0F THE FIflST NON-RESIDENT ABORT 


3464 


030752 


001413 








BEQ 


26$ 


;+IF EQUAL BRANCH 


3465 
















;-»-ELSE ERROR 


3466 


030754 


005237 


001200 






INC 


$TMP1 


;+SET ERROR INDICATOR 


3467 


030760 


013/37 


177572 


001366 




MOV 


SRO.WASSRO 


;-fREAD SRO 


3468 


030766 


012737 


030542 


001364 




MOV 


#20$,C0RSR2 


;-l-READ CORRECT SR2 VALUE 


3469 


030774 


104071 








ERROR 


71 


;+SR2 DID NOT CONTAIN THE VALUE OF 


3470 
















l+THE FIRST NR ABORT 


3471 


















3472 


















3473 


030776 


005037 


001200 






CLR 


STMPI 


;+CLEAR ERROR INDICATOR 


3474 


031002 


000005 






26$: 


RESET 




;+ISSUE INIT. CONDITIONS 


3475 


031004 


005737 


177572 






TST 


SRO 


;+SRO SHOULD BE CLEAR 


3476 


031010 


001412 








BEQ 


27$ 


;+IF TRUE BRANCH 


3477 
















l+ELSE ERROR 


3478 


031012 


005237 


001200 






INC 


STMPI 


;+SET ERROR INDICATOR 


3479 


031016 


013737 


177572 


001366 




MOV 


SRO.WASSRO 


;-l-READ s^:o 


3480 


031024 


005037 


001362 






CLR 


CORSRO 


;<«-SET CORRECT SRO VALUE FOR ERROR MSG 


3481 


031030 


104072 








ERROR 


72 


;+SRO DID NOT CLEAR AFTER INIT. 


3482 


















3483 


















3484 


















3485 


031032 


005037 


001200 






CLR 


STMPI 


;+CLEAR ERROR INDICATOR 


3486 


031036 


005237 


177572 




27$: 


INC 


SRO 


;4-TURN MEM MANG ON 


3487 


031042 


013737 


177576 


001370 


30$: 


MOV 


SR2,WASSR2 


;-i-READ SR2 


3488 


031050 


023727 


001370 


031042 




CMP 


WASSR2,#30$ 


;-HS SR2 TRACKING AGAIN 


3489 


031056 


001405 








BEQ 


31$ 


;+YES, BRANCH 



CFKTHBO PDP 11/34 MEM MGNT DIAG MACYII 30A(1052) 27-UUN-78 09:33 PAG7 72 
27-JUN-78 09:27 T41 MORE CHECKS OF SRO & SR2 



CFKTHB.P11 



SEQ 0071 



3490 
3491 
3492 
3493 
3494 
3495 
3496 
3497 
3498 
3499 
3500 
3501 
3502 
3503 
3504 
3505 
3506 
3507 
3508 
3509 
3510 
3511 
3512 
3513 
3514 
3515 
3516 
3517 
3518 
3519 
3520 
3521 
3522 
3523 
3524 
3525 
3526 
3527 
3528 
3529 
3530 
3531 
3532 
3533 
3534 



031060 005237 001200 
031064 012701 031042 
031070 104041 



031072 012737 030146 

031100 012737 077406 

031106 012737 077406 

031114 012737 002400 



001110 31$: 
172310 
172312 
000250 



031122 
031 124 
031130 
031136 
031 142 
031 146 
031 154 
031 162 
031170 
031176 
031202 
031210 
031216 



031222 
031226 
031230 
031234 



000004 
004737 
012737 
005037 
012706 
012737 
012737 
012737 
012737 
012706 
012737 
012737 
005737 



013701 
010602 
005037 
104042 



INC 
MOV 
ERROR 



MOV 
MOV 
MOV 
MOV 



$TMP1 
#30$, R1 
41 



#1$,$LPERR 
#77406, KIPDR4 
#77406, KIPDR5 
#MGMERR.MMVEC 



;+ELSE ERROR 

;+SET ERROR INDICATOR 

;-i-SET CORRECT SR2 VALUE FOE ERROR MSG 
•,+ERR0R,SR2 IS NOT TRACKING CORRECTLY 



; RESET LOOP ON ERROR POINTER TO 1$ 
{RESET PDR4 TO 128 BLKS. R/W 
; RESET PDR5 TO 128 BLKS. R/W 
•.RESTORE ADDRESS OF NORMAL MEMORY 
{MANAGEMENT TRAP ROUTINE TO M.M. VECTOR 



I.********************************************** 

USER ABORT PICKS UP KERNEL SPACE VECTOR 



THIS TEST CHECKS TO BE SURE THAT WHEN AN ABORT OCCURS WHILE IN 
USER MODE, THE TRAP VECTOR INFORMATION FETCHED IS TAKEN FROM 
KERNEL SPACE. USER PAGE IS MAPPED TO 1 2K (60000-77776) SO 
THAT IF USER SPACE IS USED INSTEAD OF KERNEL, THE NEW PC THAT 
WAS LOADED AT LOC. 060004 IS USED INSTEAD OF THE NEW PC THAT 
SHOULD BE PICKED UP FROM LOC. 000004. AN ODD ADDRESS ERROR IS USED 
TO CAUSE A TRAP TO "4*. 



TST42: SCOPE 



*«**«***«**♦***♦♦«♦♦******* 



036002 
031136 
177776 
001 100 
000600 
031236 
000340 
140000 
000700 
031222 
000340 
031223 



177776 
177776 



2$: 



177640 
000004 
000006 
177776 

000004 
000006 



3$: 



USR 
MOV 
CLR 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
TST 



MOV 
MOV 
CLR 
ERROR 



PC, TOFF 

#2$,$LPERR 

PSW 

#KERSTK,KSP 
#600,UIPAR0 
#4$,@#4 
#340, @#6 
#140000, PSW 
#USESTK,USP 
#3$,f>#4 
#340, »#6 
3$-»-1 



PSW.RI 
SP,R2 
PSW 
42 



TURN OFFT-BIT TRAPPING FOR THIS TEST 

SET LOOP ON ERROR POINTER TO 3$ 

GO TO KERNEL MODE 

SETUP KERNEL STACK PTR. 

MAP USER PAGE TO 1 2K 

LOAD KERNEL VECTOR 4 (LOC. 4) WITH 4$ 

LOAD VECTOR-l-2 WITH NEW PSW 

GO TO USER MODE 

SETUP USER STACK PTR. 

LOAD USER VECTOR 4 (LOC 60004) WITH 3$ 

LOAD VECTOR+2 WITH NEW PSW 

CAUSE ODD ADDR. ERROR TRAP TO "4" 

SHOULD PICK UP NEW PC=4$ FROM KERNEL 

LOC. 4, NOT PC=3$ FROM USER LOC. 4 («60004) 

SAVE PSW FOR ERROR 

SAVE VALUE OF STACK POINTER FOR ERROR 
BE SURE BACK IN KERNEL MODE 
DID NOT TRAP THRU KERNEL SPACE 
FOR TIGHTER SCOPE LOOP 



CFKTHBO POP 11/34 MEM MGNT DUG MACY11 30^(1052) 27-JUN-78 09:33 PAGE 73 

- - - USER ABORT PICKS UP KERNEL SPACE VECTOR 



CFKTHB 


P1 1 


27-JUN-78 


09:27 


3535 








3536 








3537 


031236 


005037 


177776 


3538 


031242 


012706 


001 100 


3539 


031246 


005037 


177640 


3540 


031252 


012737 


140000 


3541 


031260 


01 2706 


000700 


3542 


031264 


005037 


177776 


3543 


031270 


012737 


002332 


3544 


031276 


012737 


031124 


3545 


031304 


004737 


036036 


3546 








3547 








3548 








3549 








3550 








3551 








3552 








3553 








3554 


031310 


000004 




3555 








3556 


031312 


01 2737 


031324 


3557 


031320 


01 2702 


170000 


3558 


031324 


010237 


177776 


3559 


031330 


012746 


000340 


3560 


031334 


01 2746 


031342 


3561 


031340 


000002 




3562 


031342 


013701 


177776 


3563 


031346 


042701 


007437 


3564 


031352 


005037 


177776 


3565 


031356 


020201 




3566 


031360 


001401 




3567 


031362 


104060 




3568 








3569 








3570 








3571 


031 3S4 


012737 


031312 


3572 








3573 









SEQ 0072 



4$: 



000004 
001110 







{REPLACE ERROR CALL WITH 








;"BR 2$" = 000740 




CLR 


PSW 


;BE SURE BACK IN KERNEL MODE 




MOV 


ffKERSTK.KSP 


JRESTORE KERNEL S.P. IN CASE 


IT CHANGED 


CLR 


UIPARO 


; REMAP USER PAGE TO 0-4K 




MOV 


*1 40000, PSW 


;G0 TO USER MODE 




MOV 


#USESTK,USP 


;RESTORE USER STACK POINTER 




CLR 


PSW 


;G0 BACK TO KERNEL MODE 




MOV 


#TIMERR,e>#4 


; RESTORE ADDR. OF NORMAL CPU 


TRAP HANDLER TO 4 


MOV 


#1$,$LPERR 


; RESET LOOP ON ERROR POINTER 


TO IS 


USR 


PC, TON 


JTURN T-BIT TRAPPING BACK ON 





*TEST 43 



RTI IN USER MODE DOES NOT CHANGE PSW 



THIS TEST CHECKS TO SEE THAT WHEN AN RTI IS EXECUTED IN USER 
MODE, THE MODE OR PRIORITY BITS OF THE PSW ARE NOT CHANGED. 



SCOPE 



001110 1$: 
2$: 



3$: 



MOV 
MOV 
MOV 
MOV 
MOV 
RTI 
MOV 
BIC 
CLR 
CMP 
BEQ 
ERROR 



#2$.$LPERR 
#170000, R2 
R2,PSW 
#340, -(SP) 
#3$,-{SP) 

PSW.RI 

#7437, R1 

PSW 

R2,R1 

4$ 

60 



#1$.$LPERR 



;SET LOOP ON ERROR POINTER TO 2$ 

;LOAD "PRESENT & EXPECTED" PSW VALUE INTO R2 

;G0 TO USER MODE-PRIORITY 

;PUT A NEW PSW (PRI0RITY=7) ON STACK 

;PUT NEW PC ON THE STACK 

;D0 AN RTI FROM USER MODE 

;READ NEW PSW INTO R1 

jMASK OFF COND. CODE, T-BIT. AND UNUSED BITS 

;G0 BACK TO KERNEL MODE 

;DID PSW STAY IN USER. PRIORITY-0? 

; BRANCH IF YES 

;PSW CHANGED BY AN RTI FROM USER 
JFOR A TIGHTER SCOPE LOOP 
; REPLACE ERROR CALL WITH 
?"BR=2$'' « 000760 

; RESET LOOP ON ERROR POINTER TO 1$ 
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SEQ 0073 



3574 
3575 
3576 
3577 
3578 
3579 
3580 
3581 
3582 
3583 
3584 
3585 



;*TEST 44 



KT ERROR NOT SERVICED IF ODD ADDR. ERROR 



3621 
3622 
3623 
3624 
3625 
3626 
3627 
3628 
3629 



THIS TEST CHECKS TO SEE THAT IF A CERTAIN VIRTUAL ADDRESS THAT 

WOULD CAUSE A MEMORY MANAGEMENT ERROR CAUSES AN ODD ADDRESS 

ERROR FIRST, THE ODD ADDRESS ERROR IS SERVICED BUT THE MEMORY 

MANAGEMENT ERROR ISN'T. THIS MEANS THAT SRO AND SR2 

SHOULD NOT REPORT THE ERROR OR LOCK UP ITS VIRTUAL ADDRESS. 

A READ-ONLY VIOLATION IS USED AS THE POTENTIAL MEMORY MANAGEMENT 

ERROR 



************ 



3586 


031372 


000004 






TST44: 


SCOPE 




3587 


031374 


012737 


000600 


172350 


1$: 


MOV 


#600,KIPAR4 


3588 


031402 


012705 


077402 






MOV 


#77402, R5 


3589 


031406 


01 0537 


172310 






MOV 


R5,KIPDR4 


3590 


031412 


01 2737 


031442 


000004 




MOV 


#4$,f»#4 


3391 


031420 


012737 


031440 


0002SO 




MOV 


#3$,9#250 


3592 


031426 


012737 


031434 


001110 




MOV 


#2$,$LPERR 


3593 


031434 


005237 


060001 




2$: 


INC 


60001 


3594 


031440 


104043 






3$: 


ERROR 


43 


3595 
















3596 
















3597 
















3598 


031442 


012706 


001 100 




4$: 


MOV 


#KERSTK,KSP 


3599 


031446 


005037 


001200 






CLR 


STMPI 


3600 


031452 


01 3737 


177572 


001366 




MOV 


SRO,WASSRO 


3601 


031460 


01 3737 


177576 


001370 


5$: 


MOV 


SR2,WASSR2 


3602 


031466 


012700 


000017 






MOV 


#17, RO 


3603 


031472 


020037 


001366 






CMP 


RO,WASSRO 


3604 


031476 


001402 








BEO 


6$ 


3305 


031500 


005237 


001200 






INC 


STMPI 


3506 


031504 


012701 


031460 




6$: 


MOV 


#5S,R1 


3607 


031510 


020;37 


001370 






CMP 


R1 ,WASSR2 


3608 


031514 


001402 








BEO 


7S 


3509 


031516 


005237 


001200 






INC 


STMPI 


3610 


031522 


005737 


001200 




7$: 


TST 


STMPI 


3S11 


031526 


001404 








BEO 


8S 


3612 


031530 


104044 








ERROR 


44 


3613 
















3614 
















3615 
















3616 


031532 


042737 


160000 


177572 




BIC 


#160000, SRO 


3617 


031540 


012737 


002332 


000004 


8$: 


MOV 


«^TIMERR,9#4 


3618 


031546 


012737 


002400 


000250 




MOV 


#MGMERR,f>#250 


3619 


031554 


012737 


077406 


172310 




MOV 


#77406, KIPDR4 


3620 


031562 


012737 


031374 


001110 




MOV 


#1S,SLPERR 



MAP KERNEL PAGE 4 TO 12-16K 
LOAD PDR4 DATA INTO R5 
MAP PAGE 4 READ-ONLY 

SET CPU TRAP VECTOR TO ADDRESS OF 4$ 

SET M.M. TRAP VECTOR TO ADDRESS OF 3$ 

SET LOOP ON ERROR POINTER TO 2$ 

CAUSE ODD ADDR. ERROR & POTENTIAL R/0 ABORT 

TRAPPED THRU M.M. VECTOR BUT SHOULDN'T HAVE 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 2$" = 000776 

RESTORE STACK POINTER AFTER TRAPPING 
CLEAR ERROR INDICATOR 
READ STATUS REG. 
READ STATUS REG. 2 

LOAD EXPECTED SRO CONTENTS INTO RO 

SRO ERROR BITS LEFT CLEAR BY TRAPPING? 

BRANCH IF YES 

SRO ERROR BITS SET WHEN ODD ADDR. SERVICED 
LOAD EXPECTED SR2 CONTENTS INTO R1 
WAS SR2 LEFT UNLOCKED BY TRAPPING? 
BRANCH IF YES 

SR2 LOCKED UP BY ODD ADDR. ERROR 
WHERE SRO OR SR2 EFFECTED? 
BRANCH IF NO 

SRO OR SR2 CHANGED BY ODD ADDR. ERROR 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 2$" « 000741 

CLEAR ERROR BITS THAT MAY BE SET IN SRO 
RESTORE ADDRESS OF NORMAL CPU TRAP HANDLER 
RESTORE ADDRESS OF NORMAL M.M. TRAP HANDLER 
REMAP PAGE 4 TO READ/WRITE 
RESET LOOP ON ERROR POINTER TO 1$ 



»,,**!»*#***#*************«*****************<f***** **************** 

*TEST 45 PC a PSW SAVED FOR KT ERROR DURING SERVICE OF ODD ADDR. 

* 

* THIS TEST CHECKS THE PC AND PROCESSOR STATUS WORD SAVED WHEN 
« A KT ERROR OCCURS DURING THE SECOND PUSH ON THE STACK DURING 

* SERVICING OF AN ODD ADDR. ERROR. DURING A "DOUBLE ERROR" 

« SEQUENCE SUCH AS THIS, THE PSW SAVED WILL BE THE ONE PICKED UP 
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SEO 0074 



SBSO ;* FROM VECTOR+2 (LOC. 6 IN THIS CASE) AFTER THE FIRST TRAP, 

3631 ;» NOT THE PSW PRESENT BEFORE THE FIRST TRAP. SRO AND SR2 

3632 SHOULD RECORD THE KT ERROR (A R/0 VIOLATION BY THE USER STACK PTR. ) 

3633 ;* 

3634 ;* NOTE THAT THE PREVIOUS MODE BITS <13:12> OF THE PSW 

3635 WILL BE SET IN THE PSW THAT IS SAVED. 

3636 ;* 
3637 



3638 


031570 


000004 






TST45: 


SCOPE 






3639 


031572 


004737 


036002 




1$: 


USR 


PC. TOFF 


;TURN T-BIT TRAPPING OFF FOR THIS TEST 


3640 


031576 


01 2737 


000600 


177646 




MOV 


<y600,UIPAR3 


,MAP USER PAGE 3 TO 12-16K 


3641 


031604 


01 2737 


000600 


177650 




MOV 


#600,UIPAR4 


.MAP USER PAGE 4 TO 12-16K 


3642 


031612 


01 2737 


077402 


177606 




MOV 


#77402, UIPDR3 


,MAP USER PAGE 3 READ-ONLY 


3643 


031620 


01 2 "37 


077406 


17761U 




MOV 


#77406, UIPDR4 


MAP USER PAGE 4 READ/WRITE 


3644 


031626 


01 2737 


031702 


000004 




MOV 


#4$. ##4 


LOAD ADDRESS OF 4$ IN CPU (ODD ADDR.) VECTOR 


3645 


031634 


012737 


140017 


000006 




MOV 


#140017, @#6 


LOAD PSW THAT SHOULD BE PUT ON STACK IN VECT0R4-2 


3646 


031642 


012737 


031702 


000250 




MOV 


#4$,@#250 


LOAD ADDRESS OF 4$ IN M.M. TRAP VECTOR 


3647 


031650 


01 2737 


000340 


000252 




MOV 


#340,@#252 


LOAD A KERNEL PSW IN MMVEC42 


3648 


031656 


01 2737 


031664 


001 110 




MOV 


#2$.$LPERR 


SET LOOP ON ERROR POINTER TO 2$ 


3649 


031664 


01 2737 


140000 


177776 


2$: 


MOV 


#140000, PSW 


GO TO USER MODE 


3G50 


031672 


01 2706 


100002 






MOV 


#100002, USP 


SET USER STACK PTR. SO SECOND PUSH IS IN PQ. 3 


3651 


031676 


005237 


100005 




3$: 


INC 


100005 


CAUSE ODD ADDRESS ERROR THAT WILL CAUSE 


3552 
















R/0 ERROR WHEN TRY TO SAVE OLD PC 


3653 


031702 


016601 


000002 




4$ 8 


MOV 


?(KSP) ,R1 


PUT PSW SAVED ON KERNEL STACK INTO Rl 


3654 


031706 


01 1603 








MOV 


(KSP) ,R3 


PUT PC SAVED ON KERNEL STACK INTO R3 


3655 


031710 


01 3737 


177572 


001366 




MOV 


5R0.WASSR0 


READ TPr CONTENTS OF M.M. STATUS REG. 


3656 


031716 


013737 


177576 


001370 




MOV 


SR2.WASSR2 


READ THE CONTENTS OF M.M. STATUS REG. 2 


3657 


031724 


042737 


160000 


177S72 




BIC 


#160000, SRO 


CLEAR THE ERROR BITS IN SRO 


3658 


031732 


005037 


177776 






CLR 


PSW 


BE SURE IN KERNEL MODE 


3S59 


031736 


01 2706 


001100 






MOV 


#KERSTK,KSP 


RESTORE KERNEL STACK POINTER 


3660 


031742 


012737 


140000 


1 77776 




MOV 


#140000, PSW 


GO TO USER MODE 


3661 


031750 


012706 


000700 






MOV 


#USESTK,USP 


RESTORE USER STACK POINTER 


3662 


031754 


005037 


177776 






CLR 


PSW 


GO BACK TO KERNEL MODE 


3663 


031760 


005037 


001 176 






CLR 


$TMPO 


CLEAR ERROR INDICATOR 


3664 


031764 


020127 


170017 






CMP 


R1 ,#170017 


WAS THE PSW SAVED THE ONE PICKED UP BY THE 


3665 
















ODD ADDR. TRAP FROM ERRVEC+2? 


3666 
















VALUE 170017 » PSW FROM LOC. 6 WITH 


3667 
















PREVIOUS MODE BITS « USER 


3568 


031770 


001402 








BEQ 


5$ 


BRANCH IF YES 


3669 


031772 


005237 


001176 






INC 


STMPO 


WRONG PSW SAVED DURING "DOUBLE ERROR" SEQUENCE 
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ERROR 



SEO 007S 



3670 
3671 
3672 
3673 
3674 
3675 
3676 
3677 
3678 
3679 
3680 
3681 
3682 
3683 
3684 
3685 
3686 
3687 
3688 
3689 
3690 
3691 
3692 
3693 
3694 
3695 
3596 
3697 
3698 
3699 
3700 
3701 
3702 
3703 
3704 
3705 
3706 
3707 
3708 
3709 
3710 
371 1 
3712 
3713 
3714 
3715 
3716 
3717 
3718 
3719 
3720 
3721 
3722 
3723 
3724 
3725 



031776 020327 031702 



032002 001402 
032004 005237 



032010 

032016 001402 

032020 005237 

032024 023727 



001176 
023727 001366 



020147 6$: 



001 176 

001370 031676 7$: 



032032 001402 

032034 005237 001176 

032040 005737 001176 

032044 001401 

032046 104045 



032050 012737 002332 

032056 012737 000340 

032064 012737 002400 

012737 077406 

012737 031572 



032072 
032100 
032106 004737 036036 



000004 
000006 
000250 
177606 
001110 



0321 12 
0321 14 
032120 
0321 26 
0321 34 
032142 
032150 
032156 



000004 
005037 
01 2737 
01 2737 
01 2737 
012737 
012737 
012700 



9$: 



CMP 

BEQ 
INC 
CMP 
BEQ 
INC 
CMP 

BEQ 
INC 
TST 
BEQ 
ERROR 



MOV 
MOV 
MOV 
MOV 
MOV 
JSR 



R3.#3$+4 
R$ 

»TMPO 

WASSRO, #20147 
7$ 

STMPO 

WASSR2,#3$ 
B$ 

STMPO 
STMPO 
9$ 
45 



#TIMERR.@#4 
#340. @#6 
#MGMERR,@#250 
#77406, UIPDR3 
#1$,$LPERR 
PC, TON 



WAS THE PC AT THE TIME OF THE ODD ADDR. ERROR 
SAVED ON THE STACK? 
BRANCH IF YES 

WRONG PC SAVED DURING TRAP SEQUENCE 

DID SRO REPORT - USER, PAGE 3, R/0 ABORT? 

BRANCH IF YES 

SRO DID NOT REPORT R/0 ABORT 
DID SR2 LOCK UP VIRTUAL ADDR. OF LAST 
INSTRUCTION SUCCESSFULLY FETCHED? 
BRANCH IF YES 

SR2 DID NOT LOCK UP ADDR. OF ODD ADDR. INST. 
ANY "ERRORS" DURING TRAP SEQUENCE? 
BRANCH IF NO 

THE WRONG PC OR PSW WERE SAVED 
OR SRO OR SR2 DID NOT REPORT R/0 
ERROR DURING ODD ADDR. - KT TRAP 
SEQUENCE 

FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 2$" = C00710 

RESTORE ADDRESS OF NORMAL CPU TRAP HANDLER 

RELOAD ERRVEC+2 WITH KERNEL PSW 

RESTORE ADDRESS OF NORMAL M.M. TRAP HANDLER 

REMAP USER PAGE 3 READ/WRITE 

RESET LOOP ON ERROR POINTER TO IS 

TURN T-BIT TRAPPING BACK ON 



THIS GROUP OF TESTS WILL TEST ALL THE LOGIC ASSOCIATED WITH 
THE "MOVE FROM PREVIOUS" AND MOVE TO PREVIOUS" INSTRUCTIONS. 



*TEST 46 MOVE FROM PREVIOUS (USER) 



THIS TEST USES THE 'MFPI ' INSTRUCTION TO ENSURE THAT THE 
PREVIOUS MODE IS CLOCKED CORRECTLY 

THERE IS A DESCRIPTION BEFORE EACH DESliNATION MODE TESTED, 



IF THE CORRECT MODE (USER) IS NOT ENABLED A NON-RESIDENT ABORT 
WILL OCCUR AND TRAP TO 23$, WHERE THE ERRORS ARE REPORTED. 



TST46: SCOPE 



172340 
000200 
000400 
000600 
000600 
007600 
077406 



172342 
172344 
172346 
172350 
1723ES 



1$: 



032162 012702 000010 



CLR 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 

MOV 



KIPARO ;MAP KERNEL PAGE TO 0-4K 

#200,KIPAR1 ;MAP KERNEL PAGE 1 TO 4-8K 

#400,KIPAR2 ;MAP KERNEL PAGE 2 TO 8-12K 

#600,KIPAR3 ;MAP KERNEL PAGE 3 TO 12-16K 

#600,KIPAR4 ;MAP KERNEL PAGE 4 TO 12-16K 

#7600,KIPAR7 ;MAP KERNEL PAGE 7 TO THE I/O PAGE 

#77406, RO ;MAKE ALL KERNEL I-SPACE PAGES RESIDENT 

;READ/WRITE. LENGTH 200 BLOCKS 

#10. R2 ;SET LOOP COUNTER TO 8 



CFKTHBO PDP 11/34 MEM MGNT DIAQ fflACYIt 30A(10S2) 27-JUN-78 09:33 PAGE 77 
CFKTHB.P11 27-UUN-78 09:27 T46 MOVE FROM PREVIOUS (USER) I-SPACE 



SEQ 007@ 



3726 


032166 


01 2701 


172300 






MOV 


^KIPDRO.RI 


;PUT ADDRESS OF FIRST PDR IN Rl 


3727 


032172 


01 0021 






S$: 


MOV 


RO, (Rl )+ 


;LOAD PDR WITH 77406 


3728 


0321 74 


077202 








SOB 


R2,2$ 


JLOOP TO 2$ UNTIL ALL PDRS LOADED 


3729 


0321 76 


012702 


000010 






MOV 


#10, R2 


;SET LOOP COUNTER TO 8 


3730 


032202 


01 2701 


177600 






MOV 


(S'UIPDRO.RI 


;PUT ADDRESS OF FIRST PDR IN Rl 


3731 


032206 


01 0021 






3$: 


MOV 


RO, (Rl )+ 


;LOAD PDR WITH 77406 


3732 


032210 


077202 








SOB 


R2,3$ 


;LOOP TO 3$ UNTIL ALL PDRS LOADED 


3733 


032212 


012737 


000000 


177640 




MOV 


^OOO.UIPARO 


;MAP USER I PAGE TO 0-4K 


3734 


032220 


01 2737 


000200 


177642 




MOV 


#200,UIPAR1 


;MAP USER I PAGE 1 TO 4-8K 


3735 


032226 


01 2737 


000400 


177644 




MOV 


#400,UIPAR2 


;MAP USER I PAGE 2 TO 8-1 2K 


3736 


032234 


012737 


000600 


177646 




MOV 


#600,UIPAR3 


;MAP USER I PAGE 3 TO 12-16K 


3737 


032242 


01 2737 


007600 


17765C 




MOV 


#7600,UIPAR7 


;MAP USER I PAGE 7 TO THE I/O PAGE 


3738 


032250 


01 2737 


032256 


001110 




MOV 


#4$,$LPERR 


;SET LOOP ON ERROR TO 4$ 


3739 


032256 








4$: 








3740 


032256 


012737 


077406 


172310 




MOV 


#77406, KIPDR4 


; KERNEL I-SPACE PAGE 4 READ/WRITE 


3741 


032264 


012737 


000600 


172350 




MOV 


#600,KIPAR4 


;MAP KERNEL I PAGE 4 TO 1 2K 


3742 


032272 


01 2737 


000600 


177650 




MOV 


*600,UIPAR4 


;MAP USER I PAGE 4 TO 12K 


3743 


032300 


01 2700 


036514 






MOV 


#3651 4, RO 


JLOAD DATA PATTERN INTO RO 


3744 


032304 


010037 


100000 






MOV 


RO, ##100000 


JLOAD DATA PATTERN INTO PHY 60000 


3745 


032310 


01 2737 


032712 


000250 




MOV 


#23$,MMVEC 


;SET M.M. VECTOR TO 23$ 


3746 


032316 


105037 


172310 






CLRB 


KIPDR4 


MAKE KERNEL I-SPACE PAGE 4 NON-RESIDENT 


3747 












!THE 


FOLLOWING WILL TEST 


DSTMsO MFPI 


3748 


















3749 


032322 


012737 


032330 


001110 




MOV 


#5$,$LPERR 


SET LOOP ON ERROR POINTER TO 5$ 


3750 


032330 


012737 


030340 


177776 


5$: 


MOV 


#030340, PSW 


MAKE PREVIOUS MODE USER 


3751 


032336 


006506 






65: 


MFPI 


USP 


PUT USER STACK POINTER ON KERNEL 


3752 
















STACK 


3753 


032340 


022706 


001100 






CMP 


#KERSTK,KSP 


WAS SOMETHING PUSHED ON STACK AT 6$ 
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3754 032344 001407 BEQ 7$ ;BRANCH IF NOTHING WAS PUSHED 

3755 032346 012600 MOV (KSP)+,RO ;POP KERNEL STACK INTO RO 

3756 032350 012701 000700 MOV #USESTK,R1 ; EXPECTING TO GET 700 AS USP 
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:fkthb 


P1 1 


27-JUN-78 


09:27 




T46 


MOVE 


FROM PREVIOUS 


(USER) 1-SPACE 


3757 


032354 


020001 








CMP 


RO.RI 


;DID YOU GET THE RIGHT POINTER? 


3758 


032356 


001403 








BEQ 


8$ 


; BRANCH IF YOU DID 


3759 


032360 


104046 








ERROR 


46 


; WRONG THING WAS PUSHED ON STACK 


3760 
















;FOR TIGHTER SCOPE LOOP 


3761 
















JREPLACE ERROR CALL WITH 


3762 
















; "BR 5$" = 000763 


3763 


032362 


000401 








BR 


8$ 


; BRANCH TO NEXT TRY 


3764 


032364 


104050 






7$: 


ERROR 


50 


;N0TH1NG PUSHED ON STACK 


3765 
















;FOR TIGHTER SCOPE LOOP 


3766 
















{REPLACE ERROR CALL WITH 


3767 
















; "BR 5$" = 000761 


3768 


032366 








8$: 


;THE 


FOLLOWING WILL 


TEST DSTM=1 MFPI. 


3769 


032366 


01 2737 


032400 


001110 




MOV 


)y9$,$LPERR 


;SET LOOP ON ERROR POINTER TO 9$ 


3770 


032374 


01 2700 


036514 






MOV 


#36514, RO 


•.RELOAD DATA PATTERN IN RO 


3771 


032400 


01 2737 


030340 


177776 


9$: 


MOV 


#030340, PSW 


JMAKE PREVIOUS MODE USER 


3772 


032406 


01 2702 


100000 






MOV 


#100000, R2 


; LOAD VIRTUAL ADDRESS INTO R2 


3773 


032412 


006512 








MFPI 


(R2) 


;READ FROM PHYSICAL 60000 


3774 


032414 


01 2601 








MOV 


(KSP)-i-,R1 


;POP KERNEL STACK INTO R1 


3775 


032416 


020001 








CMP 


RO.RI 


;WAS DATA FETCHED SAME AS STORED 


3776 


032420 


001401 








BEQ 


10$ 


; BRANCH IF CORRECT DATA WAS FETCHED 


3777 


032422 


104046 








ERROR 


46 


; WRONG DATA WAS FETCHED 


3778 
















;FOR TIGHTER SCOPE LOOP 


3779 
















; REPLACE ERROR CALL WITH 


3780 
















;"BR 9$" = 000766 


3781 


032424 








10$: 


;THE 


FOLLOWING WILL 


TEST DSTM=2 MFPI. 


3782 


032424 


01 2737 


032432 


001 1 10 




MOV 


#1 1$,$LPERR 


;SET LOOP ON ERROR POINTER TO 11$ 


3733 


032432 


01 2737 


030340 


177776 


11$: 


MOV 


#030340, PSW 


jMAKE PREVIOUS MODE USER 


3784 


032440 


01 2702 


100000 






MOV 


#100000, R2 


;LOAD VIRTUAL ADDRESS INTO R2 


3785 


032444 


006522 








MFPI 


(R2) + 


;READ FROM PHYSICAL 60000 


3786 


032446 


01 2601 








MOV 


(KSP)+,R1 


;POP KERNEL STACK INTO R1 


3787 


032450 


020001 








CMP 


RO.RI 


;WAS DATA FETCHED SAME AS STORED 


3788 


032452 


001401 








BEQ 


12$ 


; BRANCH IF CORRECT DATA WAS FETCHED 


3789 


032454 


104046 








ERROR 


46 


; WRONG DATA WAS FETCHED 


3790 
















;FOR TIGHTER SCOPE LOOP 


3791 
















•.REPLACE ERROR CALL WITH 


3792 
















•"BR 11$" = 000766 


3793 


032456 








12$: 


JTHE 


FOLLOWING WILL 


TEST DSTM«3 MFPI. 
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3794 


032456 


012737 


032464 


001110 


MOV 


#13$.$LPERR 


;SET LOOP ON ERROR POINTER TO 13$ 


3795 


032464 


012737 


030340 


177776 13$: 


MOV 


#030340, PSW 


•.MAKE PREVIOUS MODE USER 


3796 


032472 


006537 


100000 




MFPI 


f># 100000 


;READ FROM PHYSICAL 60000 


3797 


032476 


012601 






MOV 


(KSP)+,R1 


;POP KERNEL STACK INTO R1 


3798 


032500 


020001 






CMP 


R0,R1 
14$ 


;WAS DATA FETCHED SAME AS STORED 


3799 


032502 


001401 






BEQ 


; BRANCH IF CORRECT DATA WAS FETCHED 


3800 


032504 


104046 






ERROR 


46 


; WRONG DATA WAS FETCHED 


3801 














;FOR TIGHTER SCOPE LOOP 


3802 














; REPLACE ERROR CALL WITH 



3803 

3B04 

3805 

3806 

3807 

3B08 

3809 

3010 

381 1 

3B12 

3813 

3814 

3815 

3816 

3817 

3818 

3319 

3820 

3821 

3822 

3023 

3824 

3825 

3826 

3927 

3828 

3329 

3830 

3831 

3832 

3333 

3834 

3835 

3835 

3337 

3838 

3339 

3840 

3841 

3842 

3843 

3844 

3845 

3846 

3847 

3848 

3849 

3850 

3851 

3852 

3853 

3854 

3855 

3856 

3857 

3858 



PDP 1 1/34 MEM MGNT DIAG 


MACY11 


30A( 1 


052) 27- 


JUN-78 09:33 


PAGP 81 


PI 1 


27-UUN-78 


09:27 




T46 


MOVE 


FROM PREVIOUS 


(USER) I-SPACE 


















;"BR 13$" a 000767 


032506 








14$: 


;THE 


FOLLOWING WILL 


TEST DSTM«4 MFPI. 


032506 


01 2737 


032514 


001110 




MOV 


#15$,$LPERR 




;SET LOOP ON ERROR POINTER TO 15$ 


032514 


01 2737 


030340 


177776 


15$: 


MOV 


#030340. PSW 




;MAKE PREVIOUS MODE USER 


032522 


01 2702 


100002 






MOV 


fyi00002,R2 




; LOAD VIRTUAL ADDRESS INTO R2 


032526 


0C6542 








MFPI 


"(R2) 




;READ FROM PHYSICAL 60000 


032530 


01 2601 








MOV 


(KSP)+,R1 




;POP KERNEL STACK INTO R1 


032532 


020001 








CMP 


RO , R1 




J WAS DATA FETCHED SAME AS STORED 


032534 


001401 








BEQ 


16$ 




; BRANCH IF CORRECT DATA WAS FETCHED 


032536 


104046 








ERROR 


46 




; WRONG DATA WAS FETCHED 


















;FOR TIGHTER SCOPE LOOP 


















{REPLACE ERROR CALL WITH 


















;"BR 15$" = 000766 


032540 








16$! 




















;THE 


FOLLOWING WILL 


TEST DSTMsS MFPI. 


032540 


01 2737 


032546 


001 110 




MOV 


#17$,$LPERR 




;SET LOOP ON ERROR POINTER TO 17$ 


032546 


01 2737 


030340 


177776 


17$: 


MOV 


#030340, PSW 




;MAKE PREVIOUS MODE USER 


032554 


01 2737 


100000 


001202 




MOV 


#100000, $TMP2 


; LOAD TEST LOC. VIRT. ADDR INTO LOG 


032562 


01 2702 


001204 






MOV 


#<$TMP2+2>,R2 


; LOAD ADDR. OF $TMP2+2 INTO R2 


032566 


006552 








MFPI 


S>-(R2) 




;READ FROM PHYSICAL 60000 


032570 


01 2601 








MOV 


(KSP)+,R1 




; POP KERNEL STACK INTO R1 


032572 


020001 








CMP 


RO.RI 




;WAS DATA FETCHED SAME AS STORED 


032574 


001401 








BEQ 


•8$ 




; BRANCH IF CORRECT DATA WAS FETCHED 


032576 


104046 








ERROR 


46 




; WRONG DATA WAS FETCHED 


















;FOR TIGHTER SCOPE LOOP 


















jREPLACE ERROR CALL WITH 


















;"BR 17$" = 000763 


032600 








18$: 


;THE 


FOLLOWING WILL 


TEST 


DSTM=6 MFPI. 


032600 


01 2737 


032606 


001110 




; 

MOV 


#19$,$LPERR 




;SET LOOP ON ERROR POINTER TO 19$ 


032606 


01 2737 


030340 


177776 


19$: 


MOV 


#030340, PSW 




JMAKE PREVIOUS MODE USER 


032614 


005002 








CLR 


R2 




;MAKE REGISTER 2 A ZERO 


032616 


006562 


1 00000 






MFPI 


1 00000 (R2} 




;READ from PHYSICAL 60000 


032622 


01 2601 










(KSP)+,R1 




;POP KERNEL STACK INTO R1 


032624 


020001 








CMP 


RO.RI 




;WAS DATA FETCHED SAME AS STORED 


032626 


001401 








BEQ 


20$ 




; BRANCH IF CORRECT DATA WAS FETCHED 


032630 


104046 








ERROR 


46 




; WRONG DATA WAS FETCHED 


















;FOR TIGHTER SCOPE LOOP 


















;REPLACE ERROR CALL WITH 


















;"BR 19$" = 000766 


032632 








20$: 


;THE 


FOLLOWING WILL 


TEST 


DSTM=7 MFPI. 


032632 


012737 


032640 


0011 10 




MOV 


#21$,$LPERR 




;SET LOOP ON ERROR POINTER TO 21$ 


032640 


01 2737 


030340 


177776 


21$: 


MOV 


#030340, PSW 




;MAKE PREVIOUS MODE USER 


032646 


012737 


100000 


001202 




MOV 


#1 00000. $TMP2 


;LOAD TEST LOC. V.A. INTO $TMP2 


032654 


01 2702 


001202 






MOV 


#$TMP2,R2 




;L0AD ADDRESS OF $TMP2 INTO R2 


032660 


006572 


000000 






MFPI 


f»0(R2) 




;USE $TMP2 TO FETCH VIRTUAL 


















; ADDRESS OF 60000 


032664 


012601 








MOV 


{KSP)-»-,R1 




;POP KERNEL STACK INTO R1 


032666 


020001 








CMP 


RO.RI 




;WAS DATA FETCHED SAME AS STORED 


032670 


001401 








BEQ 


22$ 




BRANCH IF CORRECT DATA WAS FETCHED 


032672 


104046 








ERROR 


46 




; WRONG DATA WAS FETCHED 



$TMP2 



;FOR TIGHTER SCOPE LOOP 
{REPLACE ERROR CALL WITH 
;»BR 21$" » 000762 
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SEO 00B1 



3859 
3860 
3861 
3862 
3863 
3864 
3865 
3066 
3867 
3868 
3869 
3070 
3871 
3872 
3873 
3874 
3875 
3876 
3877 
3878 
3879 
3880 
3881 
3882 
3883 
3084 
3885 
3886 
3887 
3088 
3889 
3890 
3891 
3892 
3893 
3894 
3895 
3896 
3397 
3098 
3899 
3900 
3901 
3902 
3903 
3904 
3905 
3906 
3907 
3908 
3909 
3910 
3911 
3912 
3913 
3914 



032674 
032702 
032710 



032712 
032716 
032722 
032730 



012737 002400 000250 
012737 032114 001110 
000423 



012637 001356 
012637 001360 



22$: 



23$: 



013737 
01 3737 
032736| 042737 
032744;' 104051 



177572 
177576 
160000 



001366 
001370 
177572 



MOV 
MOV 
BR 



MOV 
MOV 
MOV 
MOV 
BIC 
ERROR 



#MGMERR,MMVEC 

#1$,$LPERR 

TST47 



(KSP)+,TRAPPC 

(KSP)+,TRAPPS 

SRO.WASSRO 

5R2,WASSR2 

#160000, SRO 

51 



032746; 013746 001360 
032752 1 013746 001356 
032756! 000002 



032760 i 
032762 I 
032770 I 
032776 ! 
033004 I 
033012 



MOV TRAPPS.-{KSP) 
MOV TRAPPC.-(KSP) 
RTI 



;SET M.M. VECTOR TO NORMAL ROUTINE 
;SET LOOP POINTER TO START OF TEST 
; {BRANCH TO NEXT TEST 



{SAVE PC & PS OF TRAP 

{SAVE SRO FOR ERROR TYPEOUT 
{SAVE SR2 FOR ERROR TYPEOUT 
{CLEAR ERROR BITS IN SRO AND LEAVE 
{TRIED TO READ NON-PRESIDENT PAGE 
{FOR TIGHTER SCOPE LOOP 
{REPLACE ERROR CALL WITH 
{A "NOP" a 000240 
{PUT PC & PS OF TRAP ON STACK 



*TEST 47 



MOVE TO PREVIOUS (USER) 



******** *m**ti$*i****itnn>*** 

-SPACE 



THIS TEST USES THE 'MTPI' INSTRUCTION TO ENSURE THAT THE 
PREVIOUS MODE IS CLOCKED CORRECTLY 

THERE IS A DESCRIPTION BEFORE EACH DESTINATION MODE TESTED. 



IF THE CORRECT MODE IS NOT ENABLED A NON-RESIDENT ABORT 
WILL OCCUR AND TRAP TO 20$, WHERE THE ERRORS ARE REPORTED. 



000004 
012737 
01 2737 
012737 
012737 
012737 



077406 
077406 
000600 
000600 
033572 



172310 
177610 
172350 
177650 
000250 



TST47: SCOPE 



**************** 



*********** 



MOV #77406, KIPDR4 {KERNEL I-SPACE PAGE 4 READ/WRITE 

MOV #77406, UIPDR4 {USER I-SPACE PAGE 4 READ/WRITE 

MOV #600,KIPAR4 {MAP KERNEL I PAGE 4 TO 1 2K 

MOV #600,UIPAR4 {MAP USER I PAGE 4 TO 12K 

MOV #20$,MMVEC {SET M.M. VECTOR TO 20$ 

{THE FOLLOWING WILL TESY DSTM=0 MTPI 



033020 


012737 


030340 


1 77776 


2$: 


MOV 


#030340. PSW 


{MAKE PREVIOUS r/iGDE USER 


033026 


012746 


007777 






MOV 


#7777, -(KSP) 


{PUSH DATA ON KERNEL STACK 


033032 


006606 








MTPI 


USP 


{LOAD USER STACK POINTER 


033034 


006506 








MFPI 


USP 


{READ USER STACK POINTER 


033036 


01 2601 








MOV 


(KSP)+,R1 


{POP KERNEL STACK INTO Rl 


033040 


022701 


007777 






CMP 


#7777, R1 


{WAS USER STACK POINTER CHANGED 


033044 


001401 








BEQ 


3$ 


{BRANCH IF IT WAS 


033046 


104050 








ERROR 


50 


{USER STACK POINTER NOT CHANGED 
{FOR TIGHTER SCOPE LOOP 
{REPLACE ERROR CALL WITH 
{"BR 2$" = 000764 


033050 


01 2737 


030340 


177776 


3$: 


MOV 


#030340, PSW 


{MAKE PREVIOUS MODE USER 


033056 


012746 


000700 






MOV 


#USESTK.-(KSP) 


{GET READY TO RESTORE USER S. POINT 


033062 


006*^06 








MTPI 


USP 


{RESTORE USER STACK POINTER 


033064 








4$: 


{THIS 


WILL TEST DSTM « 


1 MTPI. 


033064 


012737 


033102 


0011 10 




MOV 


#5$,$LPERR 


{SET LOOP ON ERROR POINTER TO 5$ 


033072 


012702 


100000 






MOV 


#100000, R2 


{ LOAD VIRTUAL ADDRESS INTO R2 
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SEO 0082 



3915 


033076 


012700 


125252 






MOV 


#1 25252.ro 


;LOAD TEST DATA INTO RO 


3916 


033102 


010046 






5$: 


MOV 


RO,-(KSP) 


;PUSH TEST DATA ON KERNEL STACK 


391 7 


0331 04 


1 05037 


1 72310 






CLRB 


KI PDR4 


;MAKE KERNEL I PAGE 4 NON-RESIDENT 


3918 


0331 10 


006612 








MTPI 


(R2) 


;LOAD TEST DATA INTO PHYSICAL 60000 


3919 


0331 12 


112737 


000006 


172310 




MOVE 


#006,KIPDR4 


JMAKE KERNEL PAGE 4 RESIDENT 


3920 


033120 


01 1201 








MOV 


(R2),R1 


;READ FROM ADDRESS 60000 


3921 


033122 


020001 








CMP 


RO.RI 


;SEE IF DATA WAS STORED AT CORRECT PLACE 


3922 


033124 


001401 








BEQ 


6$ 


; BRANCH IF STORE WAS CORRECT 


3923 


033126 


104047 








ERROR 


47 


; INCORRECT STORE 


3924 
















;FOR TIGHTER SCOPE LOOP 


3925 
















; REPLACE ERROR CALL WITH 


3926 
















;"BR 5$" = 000765 


3927 


0331 30 








6$: 


;THE 


FOLLOWING WILL TEST 


DSTM=2 MTPI. 


3928 
3929 


033130 


01 2737 


033154 


001110 




MOV 


#8$,$LPERR 


; SET LOOP ON ERROR POINTER TO 8$ 


3930 


033136 


01 2737 


030340 


177776 




MOV 


«030340,PSW 


;MAKE PREVIOUS MODE USER 


3931 


033144 


012700 


125252 






MOV 


#125252. RO 


JLOAD TEST DATA INTO RO 


3932 


033150 


012702 


100000 






MOV 


#1 00000, R2 


JLOAD VIRTUAL ADDRESS INTO R2 


3933 


033154 


010046 






8$: 


MOV 


RO,-(KSP) 


;PUSH TEST DATA ON KERNEL STACK 


3934 


033156 


105037 


172310 






CLRB 


KIPDR4 


JMAKE KERNEL PAGF 4 NON-RESIDENT 


3935 


033162 


006612 








MTPI 


(R2) 


;LOAD TEST DATA INTO PHYSICAL 60000 


3936 


033164 


112737 


000006 


172310 




MOVB 


#006,KIPDR4 


;MAKE KERNEL PAGE 4 RESISENT 


3937 


033172 


013701 


100000 






MOV 


e#100000.R1 


;READ FROM ADDRESS 60000 


3938 


033176 


020001 








CMP 


RO.RI 


;SEE IF DATA WAS STORED CORRECTLY 


3939 


033200 


001401 








BEQ 


9$ 


{BRANCH IF STORE WAS CORRECT 


3940 


033202 


104047 








ERROR 


47 


{INCORRECT STORE 


3941 
















;FOR TIGHTER SCOPE LOOP 


3942 
















■REPLACE ERROR CALL WITH 


3943 
















;"BR 8$" = 000764 


3944 


033204 








9$: 


JTHIS 


WILL TEST DSTM ■ 3 


MTPI. 


3945 


033204 


012737 


033224 


001110 




MOV 


#10$,$LPERR 


•SET LOOP ON ERROR POINTER TO 10$ 


3946 


033212 


012737 


030340 


177776 




MOV 


#030340. PSW 


MAKE PREVIOUS MODE USER 


3947 


033220 


012700 


052525 






MOV 


#52525, RO 


LOAD TEST DATA INTO RO 


3948 


033224 


010C46 






10$: 


MOV 


RO.--(KSP) 


PUSH TEST DATA ON KERNEL STACK 


3949 


033226 


105037 


172310 






CLRB 


KIPDR4 


MAKE KERNEL I PAGE 4 NON-RESIDENT 


3950 


033232 


006637 


100000 






MTPI 


e#1 00000 


LOAD TEST DATA INTO PHYSICAL 60000 


3951 


033236 


112737 


000006 


172310 




MOVB 


#006,KIPDR4 


MAKE KERNEL PAGE 4 RESIDENT 


3952 


033244 


013701 


100000 






MOV 


»#1 00000. R1 


READ FROM ADDRESS 60000 


3953 


033250 


020001 








CMP 


RO.RI 


SEE IF DATA WAS STORED CORRECTLY 



CFKTHBO 


PDP 11/34 MEM MGNT DXAQ MACY11 


CFKTHB. 


P11 27-JUN-78 


09! 27 


3954 


033252 


001401 




3955 


033254 


104047 




3956 








3957 








3958 








3959 


033256 






3960 


033256 


012737 


033276 001110 


3961 


033264 


012737 


030340 177776 


3962 


033272 


012700 


125252 


3963 


033276 


010046 




3964 


033300 


012702 


100002 



) 27-dUN-78 09:33 PACT 84 
MOVE TO PREVIOUS (USER) I-SPACE 



SEQ 0083 



BEQ 
ERROR 



11$ 
47 



11$: JTHIS WILL TEST DSTM 
MOV #12S,$LPERR 
MOV #030340. PSW 

MOV #1 25252, RO 

12$: MOV RO,-(KSP) 
MOV #1 00002, R2 



; BRANCH IF STORE WAS CORRECT 
{INCORRECT STORE 
5 FOR TIGHTER SCOPE LOOP 
{REPLACE ERROR CALL WITH 
{"BR 10$" » 000763 
4 MTPI. 

{SET LOOP ON ERROR POINTER TO 12$ 

{MAKE PREVIOUS MODE USER 

{LOAD TEST DATA INTO RO 

{PUSH TEST DATA ON KERNEL STACK 

{LOAD VIRTUAL ADDRESS INTO R2 



FKTHBO 


PDP 11/34 MEM MGNT DUG 


MACY11 


FKTHB. 


P1 1 


27-JUN-78 


09:27 




3965 


033304 


105037 


172310 




3966 


033310 


006642 






3967 


033312 


1 1 2737 


000006 


172310 


3968 


033320 


01 3701 


100000 




3969 


033324 


020001 






3970 


033326 


001401 






3971 


033330 


104047 






3972 










3973 










3974 










3975 


033332 








3976 










3977 


033332 


01 2737 


033364 


001 110 


3978 


033340 


01 2737 


030340 


177776 


3979 


033346 


01 2700 


052525 




3980 


033352 


01 2702 


001204 




3981 


033356 


01 2737 


100000 


001203 


3982 


033364 


010046 






3983 


033366 


105037 


172310 




3984 


033372 


006652 






3985 


033374 


1 12737 


000006 


172310 


3986 


033402 


01 3701 


100000 




3987 


033406 


020001 






3988 


033410 


001401 






3989 


033412 


104047 






3990 










3991 










3992 










3993 


033414 








3994 










3995 


033414 


01 2737 


033436 


001 110 


3996 


033422 


01 2737 


030340 


I7777fa 


3997 


033430 


01 2700 


052525 




3998 


033434 


005002 






3999 


033436 


01 0046 






4000 


033440 


105037 


172310 




4001 


033444 


006662 


100000 




4002 


033450 


1 1 2737 


000006 


172310 


4003 


033456 


01 3701 


100000 




4004 


033462 


020001 






4005 


033464 


001401 






4006 


033466 


104047 






4007 










4008 










4009 










4010 


033470 








401 1 










4012 


033470 


01 2737 


033522 


001 110 


4013 


033476 


012737 


030340 


177776 


4014 


033504 


01 2700 


125252 




4015 


033510 


01 2737 


100000 


001202 


4016 










4017 


033516 


01 2702 


001202 




4018 


033522 


01 0046 






4019 


033524 


105037 


172310 




4020 


033530 


00667S 


000000 





) 27-JUN-78 09:33 PAGE 85 
MOVE TO PREVIOUS (USER) I-SPACE 



SEQ 0084 



CURB 


KIPDR4 


MTPI 


-(R2) 


MOVB 


*006,KIPDR4 


MOV 


«»#100000,R1 


CMP 


RO.RI 


BEQ 


13$ 


ERROR 


47 



;THE FOLLOWING WILL TEST 



MAKE KERNEL I PAGE 4 NON-RESIDENT 

LOAD TEST DATA INTO PHYSICAL 60000 

MAKE KERNEL PAGE 4 RESIDENT 

READ FROM ADDRESS 60000 

SEE IF DATA WAS STORED CORRECTLY 

BRANCH :F STORE WAS CORRECT 

INCORRECT STORE 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 12$" = 000762 

DSTM=5 MTPI. 



MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

CLRB 

MTPI 

MOVB 

MOV 

CMP 

BEQ 

ERROR 



(iiMS.SLPERR 

#030340, PSW 

#52525, RO 

#<$TMP2+2>,R2 

#100000, $TMP2 

RO,-(KSP) 

KIPDR4 

f»-(R2) 

#006,KIPDR4 

P#100000,R1 

R0,R1 

15$ 

47 



;THIS WILL TEST DSTM » 



MOV 

MOV 

MOV 

CLR 

MOV 

CLRB 

MTPI 

MOVB 

MOV 

CMP 

BEQ 

ERROR 



#16$,$LPERR 
#030340, PSW 
#52525, RO 
R2 

RO,-{KSP) 

KIPDR4 

100000(R2) 

#006,KIPDR4 

©#100000, R1 

R0,R1 

17$ 

47 



;THE FOLLOWING WILL TEST 



SET LOOP ON ERROR POINTER TO 14$ 
[MAKE PREVIOUS MODE USER 
LOAD TEST DATA INTO RO 
LOAD ADDR. OF LOC. $TMP2+2 INTO R2 
LOAD VIRT. ADDR. OF TEST LOC. INTO $TW:i»2 
PUSH TEST DATA ON KERNEL STACK 
MAKE KERNEL PAGE 4 NON-RESIDENT 
LOAD TEST DATA INTO PHYSICAL 60000 
IMAKE KERNEL PAGE 4 RESIDENT 
READ FROM ADDRESS 60000 
SEE IF DATA WAS STORED CORRECTLY 
BRANCH IF STORE WAS CORRECT 
INCORRECT STORE 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 14$" = 000764 
6 MTPI. 



SET LOOP ON ERROR POINTER TO 16$ 

MAKE PREVIOUS MODE USER 

LOAD TEST DATA INTO RO 

MAKE REGISTER 2 ZERO 

PUSH TEST DATA ON KERNEL STACK 

MAKE KERNEL I PAGE 4 NON-RESIDENT 

LOAD TEST DATA INTO PHYSICAL 60000 

MAKE KERNEL PAGE 4 RESIDENT 

READ FROM ADDRESS 60000 

SEE IH DATA WAS STORED CORRECTLY 

BRANCH IF STORE WAS CORRECT 

INCORRECT STORE 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 16$" = 000763 

DSTM=7 MTPI. 



MOV 
MOV 
MOV 
MOV 

MOV 
MOV 
CLRB 
MTPI 



#18$,$LPERR 
#030340, PSW 
#1 25252, RO 
#1 00000, $TMP2 

#$TMP2,R2 
RO,-(KSP) 
KIPDR4 
#0(R2} 



;SET LOOP ON ERROR POINTER TO 18$ 

;MAKE PREVIOUS MODE USER 

;LOAD TEST DATA INTO RO 

JLOAD VIRT. ADDR. OF TEST LOCATION 

; INTO LOCATION $TMP2 

;L0AD ADDRESS OF $TMP2 INTO R2 

;PUSH TEST DATA ON KERNEL STACK 

;MAKE KERNEL PAGE 4 NON-RESIDENT 

JLOAD TEST DATA INTO PHYSICAL 60000 



CFKTHBO PDP 11/34 MEM MGNT DIAG MACY11 30A(1052) 27-JUN-78 09:33 PAGE 86 
CFKTHB.P11 27-UUN-78 09:27 T47 MOVE TO PREVIOUS (USER) I-SPACE 



SEQ 008S 



4021 
4022 
4023 
4024 
4025 
4026 
4027 
4028 
4029 
4030 
4031 
4032 
4033 
4034 
4035 
4036 
4037 
4038 
4039 
4040 
4041 
4042 
4043 
4044 
4045 
4046 
4047 
4048 
4049 
4050 
4051 
4052 
4053 
4054 
4055 
4056 
4057 
4058 
4059 
4060 



033534 
033542 
033546 
033550 
033552 



033554 
033562 
033570 



033572 
033576 
033602 
033610 
033616 
033624 



033626 
033632 
033636 



1 1 2737 
01 3701 
020001 
001401 
104047 



01 2737 
01 2737 
000423 



01 2637 
01 2637 
01 3737 
01 3737 
042737 
104051 



013746 
013746 
000002 



000006 
100000 



032762 
002400 



001356 
001360 
177572 
177576 
160000 



001360 
001356 



001 110 
000250 



001366 
001370 
177572 



19$: 



MOVB 

MOV 

CMP 

BEQ 

ERROR 



MOV 
MOV 
BR 



MOV 
MOV 
MOV 
MOV 
BIC 
ERROR 



#006,KIPDR4 

f»#100000,R1 

RO.RI 

19$ 

47 



#1$,$LPERR 

#MGMERR,MMVEC 

TST50 



(KSP)+,TRAPPC 

(KSP)+,TRAPPS 

SRO,WASSRO 

SR2,WASSR2 

#160000, SRO 

51 



MOV TRAPPS,-(KSP) 
MOV TRAPPC,-(KSP) 
RTI 



MAKE KERNFL PAGE 4 RESIDENT 

READ FROM ADDRESS COOOO 

SEE IF DATA WAS STORED CORRECTLY 

BRANCH IF STORE WAS CORRECT 

INCORRECT STORE 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 18$" = 000763 

SET LOOP POINTER TO START OF TEST 
RESTORE M.M. VECTOR TO NORMAL ROUTINE 
; BRANCH TO NEXT TEST 



;SAVE PC & PS OF TRAP 

;SAVE SRO FOR ERROR TYPEDUT 
;SAVE SR2 FOR ERROR TYPEOUT 
;CLEAR ERROR BITS IN SRO 
JTRIED TO LOAD A N.R. PAGE 4 
;FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
;A "NOP" = 000240 
;PUT PC & PS OF TRAP ON STACK 



; RETURN TO TEST 



',^1til,'tt1ift^,*^,'t,iti^,^t***********4*********<¥**<t'******** ********** 

♦TEST 50 MOVE FROM PREVIOUS (KERNEL) I-SPACE TO USER MODE 

<* 

* THIS TEST CHECKS THAT IF THE PREVIOUS MODE IS KERNEL THE 

* FETCH IS FROM KERNEL SPACE. 

* THERE IS A DESCRIPTION BEFORE EACH DESTINATION MODE TESTED, 



IF THE CORRECT MODE IS NOT ENABLED A NON-RESIDENT ABORT 
WILL OCCUR AND TRAP TO 21$, WHERE THE ERRORS ARE REPORTED. 



; i^******* 



,********************** 



4061 


033640 


000004 






TST50! 


SCOPE 




4062 


033642 


01 2700 


077406 




1$: 


MOV 


#77406, RO 


4063 
















4064 


033646 


01 2702 


000010 






MOV 


^10, R2 


4065 


033652 


01 2701 


177600 






MOV 


#UIPDR0,R1 


4066 


033656 


01 0021 






2$: 


MOV 


RO, (R1 ) + 


4057 


033660 


077202 








SOB 


R2,2$ 


4068 


033662 


01 2737 


033670 


001 1 10 




MOV 


#3$,$LPERR 


4069 


033670 


012737 


140340 


177776 


3$: 


MOV 


#140340, PSW 


4070 


033676 


01 2737 


077406 


172310 




MOV 


#77406, KIPDR4 


4071 


033704 


012737 


000600 


172350 




MOV 


#600,KIPAR4 


4072 


033712 


012737 


000600 


177650 




MOV 


#600,UIPAR4 


4073 


033720 


012700 


036514 






MOV 


#36514, RO 


4074 


033724 


010037 


100000 






MOV 


R0,9#100000 


4075 


033730 


012702 


100000 






MOV 


#100000, R2 



;THE FOLLOWING WILL TEST 



MAKE ALL USER I-SPACE PAGES RESIDENT 

READ/WRITE, LENGTH 200 BLOCKS 

SET LOOP COUNTER TO 8 

LOAD ADDRESS OF FIRST PDR IN R1 

LOAD WITH 77406 

LOOP UNTIL 8 USER PDRS LOADED 

SET LOOP ON ERROR TO 3$ 

GO TO USER MODE FOR THIS TEST 

KERNEL I-SPACE PAGE 4 READ/WRITE 

MAP KERNEL I PAGE 4 TO 1 2K 

MAP USER 1 PAGE 4 TO 12K 

LOmQ DATA PATTERN INTO RO 

LOAD DATA PATTERN INTO PHY 60000 

LOAD VIRTUAL ADDRESS INTO R2 

DSTM»0 MFPI 



CFKTHBO PDP 11/34 MEM MGNT 01 AG MACY11 30A(105a) 27-JUN-78 09:33 PAG? 87 

CFKTHB.P11 27-JUN-78 09:27 T50 MOVE FROM PREVIOUS (KERNEL) I-SPACE TO USER MODE 



4077 
4078 
4079 
4080 
4081 
4082 
4083 
4084 
4085 
4086 
4087 
4088 
4089 
4090 
4091 
4092 
4093 
4094 
4095 
4096 
4097 
4098 
4099 
4100 
4101 
4102 
4103 
4104 
4105 
4106 
4107 
4106 
4109 
4110 
411 1 
4112 
4113 
4114 
4115 
4116 
4117 
4118 
4119 
4120 
4121 
4122 
4123 
4124 
4125 
4126 
4127 
4128 
4129 
4130 
4131 
4132 



033734 


01 2737 


034336 


000250 




MOV 


)5'21S,MMVEC 




033742 


105037 


177610 






CLRB 


UIPDR4 




033746 


01 2737 


1 40340 


1 77776 




MOV 


if 1 40340 , PSW 




033754 


006506 






4$: 


MFPI 


KSP 




033756 


022706 


000700 






CMP 


#USESTK,USP 




033762 


001407 








BEQ 


5$ 




033764 


01 2600 








MOV 


(USP)4-,R0 




033766 


01 2701 


001100 






MOV 


#KERSTK,R1 




033772 


020001 








CMP 


R0,R1 




033774 


001403 








BEQ 


6$ 




033776 


104046 








ERROR 


46 




034000 


000401 








BR 


6$ 




034002 


1 04050 






5$; 


ERROR 


50 




034004 








6$: 


;THE 


FOLLOWING WILL 


TEST 


034004 


01 2737 


03401 2 


001 110 




MOV 


#7$ , $LPERR 




034012 


01 2737 


140340 


177776 


7$: 


MOV 


#140340, PSW 




034020 


01 2700 


036514 






MOV 


.''3651 4 , RO 




034024 


01 2702 


100000 






MOV 


#1 00000 , R2 




034030 


00651 2 








MFPI 


(R2) 




034032 


01 2601 








MOV 


(USP)+,R1 




034034 


020001 








CMP 


RO ( R1 




034036 


001401 








BEQ 


8$ 




034040 


104046 








ERROR 


46 




034042 








8$: 


; THE 


FOLLOWING WILL 


TEST 


034042 


01 2737 


034050 


001 1 10 




MOV 


#9$ , SLPERR 




034050 


01 2737 


1 40340 


1 77776 


9$! 


MOV 


tt 1 40340 , PSW 




034056 


01 2702 


100000 






MOV 


A^IOOOOOiR!!} 




034062 


006522 








MFPI 


(R2) + 




034064 


01 2601 








MOV 


( USP)-*- , R1 




034066 


020001 








CMP 


RO , R1 




034070 


001401 








BEQ 


10$ 




034072 


104046 








ERROR 


46 




034074 








10$: 


J THE 


FOLLOWING WILL 


test' 


034074 


012737 


034102 


001110 




MOV 


#11$, SLPERR 




034102 


012737 


140340 


177776 


11$: 


MOV 


#140340, PSW 




0341 10 


006537 


100000 






MFPI 


##100000 




0341 14 


012601 








MOV 


(USP)+,R1 




0341 16 


020001 








CMP 


R0,R1 




034120 


001401 








BEQ 


12$ 




034122 


104046 








ERROR 


46 





SET M.M. VECTOR TO 21$ 

MAKE USER I-SPACE PAGE 4 NON-RESIDENT 

MAKE PREVIOUS MODE KERNEL PRESENT USER 

PUT KERNEL STACK POINTER ON USER STACK 

WAS SOMETHING PUSHED ON STACK AT 1$ 

BRANCH IF NOTHING WAS PUSHED 

POP USER STACK INTO RO 

EXPECTING 1100 AS KSP 

DID YOU GET THE RIGHT POINTER? 

BRANCH IF YOU DID 

WRONG THING WAS PUSHED ON STACK 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 4$" = 000766 

BRANCH TO NEXT TRY 

NOTHING PUSHED ON STACK 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 4$" « 000764 

DSTM=1 MFPI. 

SET LOOP ON ERROR POINTER TO 7$ 

MAKE PREVIOUS MODE KERNEL PRESENT USER 

LOAD DATA EXPECTED INTO RO 

LOAD VIRTUAL ADDRESS INTO R2 

READ FROM PHYSICAL 60000 

POP USER STACK INTO R1 

WAS DATA FETCHED SAME AS STORED 

BRANCH IF CORRECT DATA WAS FETCHED 

WRONG DATA WAS FETCHED 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 7$" = 000764 

DSM=2 MFPI. 

SET LOOP ON ERROR POINTER TO 9$ 

MAKE PREVIOUS MODE KERNEL PRESENT USER 

LOAD VIRTUAL ADDRESS INTO R2 

READ FROM PHYSICAL 60000 

POP USER STACK INTO R1 

WAS DATA FETCHED SAME AS STORED 

BRANCH IF CORRECT DATA WAS FETCHED 

WRONG DATA WAS FETCHED 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 9$" « 000766 

DSTMa3 MFPI. 

SET LOOP ON ERROR POINTER TO 11$ 

MAKE PREVIOUS MODE KERNEL PRESENT USER 

READ FROM PHYSICAL 60000 

POP USER STACK INTO R1 

WAS DATA FETCHED SAME AS STORED 

BRANCH IF CORRECT DATA WAS FETCHED 

WRONG DATA WAS FETCHED 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 11$" - 000767 



CFKTHBO PDP 11/34 MEM MGNT DIAG MACY11 30A(1052) 27-UUN-78 09:33 PAGE 88 

CFKTHB.P11 27-UUN-7a 09:27 T50 MOVE FROM PREVIOUS (KERNEL) I-SPACE TO USER MODE 



4133 


034124 








12$: 


;THE 


FOLLOWING WILL TEST 


4134 


034124 


012737 


034132 


001110 




MOV 


#13$, SLPERR ; 


4135 


0341 32 


01 2737 


140340 


177776 


13$: 


MOV 


#140340, PSW ; 


4136 


034140 


012702 


100003 






MOV 


tfl 00002, R2 : 


4137 


034144 


006542 








MFPI 


-(R2) ; 


4138 


034146 


012601 








MOV 


(USP)+,R1 ; 


4139 


034150 


020001 








CMP 


R0,R1 ; 


4140 


034152 


001401 








BEQ 


14$ ; 


4141 


034154 


104046 








ERROR 


46 ; 


4142 
















4143 
















4144 
















4145 


034156 








14$: 


;THE 


FOLLOWING WILL TEST 


4146 
4147 


034156 


01 2737 


034164 


001110 




MOV 


#15$, SLPERR 


4148 


034164 


01 2737 


140340 


177776 


1S$: 


MOV 


#140340, PSW ; 


4149 


0341 72 


01 2737 


100000 


001202 




MOV 


#1 00000, $TMP2 


4150 


034200 


01 2702 


001204 






MOV 


#<$TMP2+2>,R2 ; 


4151 


034204 


006552 








MFPI 


#-(R2) ; 


4152 


034206 


01 2601 








MOV 


(U5P)+,R1 ; 


4153 


034210 


020001 








CMP 


R0,R1 : 


4154 


034212 


001401 








BEQ 


16$ ; 


4155 


034214 


104046 








ERROR 


46 ; 


4156 
















4157 
















4158 
















4159 


034216 








16$: 


;THE 


FOLLOWING WILL TEST* 


4160 
















4161 


034216 


01 2737 


034224 


001110 




MOV 


#17$, SLPERR 


4162 


034224 


01 2737 


140340 


177776 


17$: 


MOV 


#140340, PSW ; 


4163 


034232 


005002 








CLR 


R2 ; 


4164 


034234 


006562 


100000 






MFPI 


100000(R2) ; 


4165 


034240 


012601 








MOV 


(USP)+,R1 ; 


4166 


034242 


020001 








CMP 


R0,R1 ; 


4167 


034244 


001401 








BEQ 


18$ 


4168 


034246 


104046 








ERROR 


46 ; 


4169 
















4170 
















4171 
















4172 


034250 








18$: 


;THE 


FOLLOWING WILL TEST 


4173 
















4174 


034250 


01 2737 


034256 


001 110 




MOV 


#19$, SLPERR ; 


4175 


034256 


01 2737 


140340 


177776 


19$: 


MOV 


#140340, PSW ; 


4176 


034264 


012737 


100000 


001202 




MOV 


#1 00000, $TMP2 ; 


4177 


034272 


01 2702 


001202 






MOV 


#$TMP2,R2 ; 


4178 


034276 


006572 


000000 






MFPI 


90(R2) ; 


4179 


034302 


01 2601 








MOV 


(USP)+,R1 ; 


4180 


034304 


020001 








CMP 


RO.Rl ; 


4181 


034306 


001401 








BEQ 


20$ ; 


4182 


034310 


104046 








ERROR 


46 ; 


4183 
















4184 
















4185 
















4186 


034312 


012737 


002400 


000250 


20$: 


MOV 


#MGMERR.MMVEC ; 


4187 


034320 


012737 


000340 


177776 




MOV 


#00340, PSW 


418B 


034326 


012737 


033642 


001110 




MOV 


#1$,$LPERR ; 



DSTM=4 MFPI. 

SET LOOP ON ERROR POINTER TO 13$ 

MAKE PREVIOUS MODE DERNEL PRESENT USER 

LOAD VIRTUAL ADDRESS INTO R2 

READ FROM PHYSICAL 60000 

POP USE.\ STACK INTO R1 

WAS DATA FETCHED SAME AS STORED 

BRANCH IF CORRECT DATA WAS FETCHED 

WRONG DATA WAS FETCHED 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 13$" « 000766 

DSTM=5 MFPI. 

SET LOOP ON ERROR POINTER TO 15$ 

MAKE PREVIOUS MODE KERNEL PRESENT USER 

LOAD TEST LOC . VIRT. ADDR INTO LOC. $TMP2 

LOAD ADDRESS OF $TMP2+2 INTO R2 

READ FROM PHYSICAL 60000 

POP USER STACK INTO R1 

WAS DATA FETCHED SAME AS STORED 

BRANCH IF CORRECT DATA FETCHED 

WRONG DATA WAS FETCHED 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 15$" = 000763 

DSTM=6 MFPI. 

SET LOOP ON ERROR POINTER TO 17$. 

MAKE PREVIOUS MODE KERNEL PRESENT USER 

MAKE REGISTER 2 A ZERO 

READ FROM PHYSICAL 60000 

POP USER STACK INTO R1 

WAS DATA FETCHED SAME AS STORED 

BRANCH IF CORRECT DATA FETCHED 

WRONG DATA WAS FETCHED 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 17$" = 000766 

DSTMa7 MFPI. 

SET LOOP ON ERROR POINTER TO 19$ 

MAKE PREVIOUS MODE KERNEL PRESENT USER 

LOAD TEST LOC. VIRT. ADDR. INTO $TMP2 

LOAD ADDRESS OF $TMP2 INTO R2 

READ FROM PHYSICAL 60000 

POP USER STACK INTO R1 

WAS DATA FETCHED SAME AS STORED 

BRANCH IF CORRECT DATA FETCHED 

WRONG DATA WAS FETCHED 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 19$" = 000762 

SET M.M. VECTOR TO NORMAL ROUTINE 

GO BACK TO KERNEL MODE. PREVIOUS KERNHL 

SET LOOP POINTER TO START OF TEST 
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>-KTHB 


PI 1 


27-UUN-7e 


09:27 


4189 


034334 


000423 




4190 








4191 








4192 


034336 


012S37 


001356 


4193 


034342 


012637 


001360 


4194 


034346 


013737 


177572 


4195 


034354 


013737 


177576 


4196 


034362 


042737 


160000 


4197 


034370 


104051 




4198 








4199 








4200 








4201 


034372 


013746 


001360 


4202 


034376 


013746 


001356 


4203 


034402 


000002 




4204 








4205 








4206 








4207 








4208 








4209 








4210 








421 1 








4212 








4213 


034404 


000004 




4214 


034406 


01 2737 


030340 


4215 


034414 


106506 




^215 








4217 


034416 


022706 


001100 


4218 


034422 


001407 




4219 


034424 


01 2600 




4220 


034426 


012701 


000700 


4221 


034432 


020001 




4222 


034434 


001403 




4223 


034436 


104053 




4224 








4225 








4226 








4227 


034440 


000401 




4228 


034442 


104054 




4229 








4230 








4231 








4232 


034444 


012737 


034452 


4233 


034452 


012746 


007777 


4234 


034456 


106606 




4235 


034460 


106506 




4236 


034462 


012601 




4237 


034464 


022701 


007777 


4238 


034470 


001401 




4239 


034472 


104054 




4240 








4241 








4242 








4243 


034474 


012746 


000700 


4244 


034500 


106606 





MOVE FROM PREVIOUS (KERNEL) I-SPACE TO USER MODE 



SEO OOSi 



21$: 



BR 



MOV 
MOV 
MOV 
MOV 
BIC 
ERROR 



MOV 
MOV 
RTI 



TST51 



(KSP)-l-,TRAPPC 

(KSP)+,TRAPPS 

SRO.WASSRO 

SR2,WASSR2 

If 1 60000, SRO 

51 



TRAPPS,-(KSP) 
TRAPPC,-(KSP) 



I {BRANCH TO NEXT TEXT 



JSAVE PC & PS OF TRAP 

JSAVE SRO FOR ERROR TYPEOUT 

•.SAVE SR2 FOR ERROR TYPEOUT 

;CLEAR ERROR BITS IN SRO 

; TRIED TO READ NON-RESIDENT PAGE 

;FOR TIGHTER SCOPE LOOP 

•.REPLACE ERROR CALL WITH 

;A "NOP" a 000240 

;PUT PC S PS OF TRAP ON STACK 

; RETURN TO TEST 



♦ TEST 5t MOVE FROM/TO D-f-PACE 



« MOVE FROM/TO I~SPACE 



THIS TEST CHECKS THAT SINCE THFRE IS NO DISTINCTION 

BETWEEN INSTRUCTION AND DATA SPACE IN THE 11/34 

MFPD & MTPD SHOULD BE DECODED THE SAME AS MFPI & MTPI. 



177778 1$5 



« Id « « « * « i|c 4i ♦ * « 

TST51 ! SCOPE 
MOV 
MFPD 

CMP 
BEQ 
MOV 
MOV 
CMP 
BEQ 
ERROR 



2$: 



3S: 
4S: 



BR 

ERROR 



MOV 

MOV 

MTPD 

MFPD 

MOV 

CMP 

BEQ 

ERROR 



MOV 
MTPD 



#030340, PSW 
USP 

#KERSTK,KSP 
2$ 

(KSP)+,R0 

#USESTK,R1 

RO.RI 

3$ 

53 



3$ 
54 



./4$,$LPERR 
#7777, -(KSP) 
USP 
USP 

(KSP)-l-,R1 
#7777, R1 
5$ 
54 



#USESTK,-(KSP) 
USP 



MAKE PREVIOUS MODE»USER , CURRENT^KERNEL 
MFPD SHOULD ACT LIKE MFPI PUTTING 
USER STACK POINTER ON THE KERNEL STACK 
WAS SOMETHING PUSHED ON KERNEL STACK? 
BRANCH IF NO 

POP KERNEL STACK INTO RO 
EXPECTING TO GET 700 AS USP 
DID GET RIGHT POINTER VALUE? 
BRANCH IF YES 

WRONG THING WAS PUSHED ON STACK 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"flR 1$" = 000763 
BRANCH TO NEXT TRY 
NOTHING PUSHED ON STACK 
FOR TluHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR IS" = 000761 

SET LOOP ON ERROR POINTER TO 4$ 

PUSH DATA ON KERNEL STACK 

LOAD T^ •: USER STACK POINTER 

READ USER STACK POINTER 

POP KERNEL STACK INTO R1 

WAS USER STACK POINTER CHANGED? 

BRANCH IF YES 

USER STACK POINTER NOT CHANGED 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 4$" « 000767 

GET READY TO RESTORE USER STK. PTR. 
RESTORE USER STACK POINTER 
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CFKTHB.P11 27-JUN-78 09:27 T51 MOVE FROM/TO D-SPACE » MOVE FROM/TO I-SPACE 

MOV #1$,$LPERR ;SET LOOP POINTER TO START OF TEST 

.««♦»*******♦*************«********♦*«*******♦****************** 
^TEST 52 MOVE FROM PREVIOUS I=SPACE ( PREVIOUS«CURRENT=KERNEl.) 



SEQ 0089 



4245 


034502 


012737 


4246 






4247 






4248 






4249 






4250 






4251 






4252 






4253 






4254 






4255 






4256 


034510 


000004 


4257 


034512 


005037 


4258 


034516 


01 2"00 


4259 


034522 


01 0006 


4260 


034524 


006506 


4261 






4262 


034526 


01 1601 


4263 


034530 


020001 


4264 






4265 


034532 


001401 


4266 


034534 


104046 


4267 






4268 






4269 






4270 


034536 


005740 


4271 


034540 


020600 


4272 


034542 


001401 


4273 


034544 


104050 


4274 






4275 






4276 






4277 


034546 


012706 


4278 






4279 






4280 






4281 






4282 






4283 






4284 







177778 
001100 



TST52J 
1$: 



THIS TEST CHECKS THAT IF 
ARE KERNEL. AND THE SOURC 
STACK IS NOT DECREMENTED 
"MFPI KSP" SHOULD PUSH TH 
OF KSP (1100) ONTO THE ST 

SCOPE 
CLR 



MOV 
MOV 
MFPI 

MOV 
CMP 

BEQ 
ERROR 



TST 
CMP 
BEQ 
ERROR 



BOTH PREVIOUS AND CURRENT MODES 

E MODE IS 0, THE DESTINATION 

BEFORE ACCESS. 

E NON-DECREMENTED VALUE 

ACK (AT LOC. 1076). 

SET PREVIOUS = CURRENT = KERNEL 
SETUP VALUE FOR STACK POINTER 
LOAD STACK POINTER 

THE VALUE "STACK" SHOULD BE PUSHED 

BEFORE BEING DECREMENTED 

READ DATA WHICH WAS PUSHED 

WAS THE ORIGINAL VALUE OF THE 

STACK POINTER PUSHED? 

BRANCH IF YES 

MFPI FETCHED WRONG DATA 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 1$" = 000766 

SETUP EXPECTED STACK POINTER VALUE 
WAS THE STACK POINTER DECREMENTED? 
BRANCH IF YES 

STACK NOT PUSHED BY THE MFPI 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR IS" «« 000762 
RESTORE STACK POINTER 



@#PSW 
#STACK,R(} 
RO.KSP 
KSP 

(KSP),R1 
R0,R1 

2$ 
46 



-(RO) 
KSP,RO 
3$ 
50 
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4285 










.SBTTL 


END OF 


PASS ROUTINE 




4286 


















4287 










• >» 






4288 










;*1NCREMENT THE ?ASS NUMBER ($PASS) 


4289 










;*TYPE 


"END PASS #XXXXX TOTAL NUMBER OF ERRORS SINCE LAST REPORT YYYYY" 


4290 










;*WHERE 


XXXXX 


AND YYYYY ARE DECIMAL NUMBLRS 


4291 










JflF SW12a1 INHIBIT TRACE TRAP 




4292 










;*IF THERES A 


MONITOR GO TO IT 




4293 










;*IF THERE ISN 


'T UUMP TO LOOP 




4294 


















4295 


034552 








$EOP : 








4296 


034552 


000004 








SCOPE 






4297 


034554 


005037 


001 1 02 






CLR 


$TSTNM 


; ;ZERO THE TEST NUMBER 


4298 


034560 


005037 


001 212 








$TIMES 


5 '.ZERO THE NUMBER OF ITERATIONS 


4299 


034564 


005237 


001 234 






INC 


$PASS 


INCREMENT THE PASS NUMBER 


4300 


034570 


042737 


100000 


001S34 




BIC 


#100000, $PASS 


;;DON'T ALLOW A NEG. NUMBER 


4301 


034576 


005327 








DEC 


(PC) + 


; ; LOOP? 


4302 


034600 


00000 1 






SEOPCT : 


. WORD 


1 




4303 


034602 


003072 








BGT 


$DOAGN 


; ;YES 


4304 


034604 


01 2737 








MOV 


(PC)+,#(PC)+ 


; J RESTORE COUNTER 


4305 


034606 


000001 






SENDCT 5 




1 




4306 


03461 


034600 








$EOPCT 






4307 


0346 1 2 


1 0440 1 


034620 






TYPE 


,65$ 


;;TYPE ASCIZ STRING 


4308 


03461 6 


000407 










64$ 


; ;GET OVER THE ASCIZ 


4309 










; *65$: 


. ASCIZ 


<12><15>/END PASS (// 


4310 


034636 








64$ : 








4311 


034636 


01 3746 


001234 






MOV 


SPASS,-(SP) 


;;SAVE SPASS FOR TYPEOUT 


4312 
















; ;TYPE PASS NUMBER 


4313 


034642 


1 04405 








TYPDS 




;;G0 TYPE—DECIMAL ASCII WITH SIGN 


4314 


034644 


1 04401 


034652 






TYPE 


,67$ 


; ;TYPE ASCIZ STRING 


4115 


034650 


00042 1 








BR 


66$ 


; ;GET OVER THE ASCIZ 


4316 










; ;67$: 


. ASCIZ 


/ TOTAL ERRORS 


SINCE LAST REPORT / 


4317 


0347 1 4 








66$: 








4318 


0347 1 4 


01 3746 


001 1 1 2 






MOV 


$ERTTL,-(SP) 


;;SAVE SERTTL FOR TYPEOUT 


4319 
















;; TOTAL NUMBER OF ERRORS 


4320 


034720 


1 04405 








TYPDS 




;;G0 TYPE— DECIMAL ASCII WITH SIGN 


4321 


034722 


1 04401 


001 223 






TYPE 


,$CRLF 


;;TYPE CARRIAGE RETURN, LINE FEED 


4322 


034726 


005037 


001 1 1 2 






CLR 


$ERTTL 


; .-CLEAR ERROR TOTAL 


4323 


034732 


01 3700 


000042 




$GET42: 


MOV 


@i#42,R0 


; ;GET MONITOR ADDRESS 


4324 


034736 


00 1 41 4 








BEO 


$DOAGN 


;; BRANCH IF NO MONITOR 


4325 


034740 


005046 








CLR 


-(SP) 


i; INSURE THE "T" BIT IS CLEAR 


4326 


034742 


01 2746 


034750 






MOV 


#$CLR.T,-{SP) 


;;SETUP FOR AN RTI OR RTT 


4327 


034746 


000426 








BR 


$RTRN 


;;G0 DO AN RTI OR RTT TO LOAD THE PSW 


4328 
















; ;WITH A CLEARED "T" BIT 


4329 


034750 








SCLR.T: 








4330 


034750 


01 3700 


000042 






MOV 


ej|'42,R0 


;; INSURE RO CONTAINS THE MONITORS 


4331 


034754 


001405 








BEQ 


$DOAGN 


; ; RETURN ADDRESS 


4332 


034756 


000005 








RESET 




; ;CLEAR THE WORLD 


4333 


034760 


004710 






SENDAD: 


USR 


PC,(RO) 


;;G0 TO MONITOR 


4334 


034762 


000240 








NOP 




; ;SAVE ROOM 


4335 


034764 


000240 








NOP 




; ;FOR 


4336 


034766 


000240 








NOP 




; ;ACT11 


4337 


034770 








$D0A6N: 








4338 


034770 


104400 








TRAP 




;;PUSH OLD PSW AND PC ON STACK 


4339 


034772 


042716 


000020 






BIC 


#20, (SP) 


} jCLEAR THE "T" BIT 


4340 


034776 


032777 


010000 


144134 




BIT 


#BIT12,9SWR 


; ;RUN WITH TRACE TRAP? 
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4341 
4342 
4343 
4344 
4345 
4346 
4347 
4348 
4349 
4350 
4351 
4352 
4353 
4354 
4355 
4356 
4357 
4358 
4359 
4360 
4361 
4362 
4363 
4364 
4365 
4366 
4367 
4368 
4369 
4370 
4371 
4372 
4373 
4374 
4375 
4376 
4377 
4378 
4379 
4380 
4381 
4382 
4383 
4384 
4385 
4386 
4387 
4388 
4389 
4390 
4391 
4392 
4393 
4394 
4395 
4396 



035004 001305 
035006 005137 



035032 



035012 100402 

035014 052716 000020 

035020 012746 035026 

035024 000002 



035026 

035026 000137 
035030 020466 
035032 000000 
035034 377 
035040 



1$: 

$RTRN: 



BNE 
COM 
BMI 
BIS 
MOV 
RTI 



1$ 

$TBIT 
1$ 

#20, (SP) 
#$LOOP,-(SP) 



035054 
035060 
035066 
035072 
035076 
035100 
035102 
035106 
0351 10 
0351 10 
0351 16 
035120 
035126 
035130 
035134 
035136 
035144 
035146 
035154 
035156 
035164 



$LOOP: 

JMP #(PC)+ 

$rtnad: .word loop 

$tbit: .word 

000 $ENULL: .byte -1,-1,0 
.EVEN 

.SBTTL SCOPE HANDLER ROUTINE 



;BR IF NO 

;IS IT TIME FOR TRACE TRAP 

;BR IF NO 

;SET TRACE TRAP 

;JUMP TO START OF TEST 

; RETURN— THIS IS CHANGED TO 

;AN "RTT" IF "RTT" IS A LEGAL 

; INSTRUCTION 

; RETURN 

;"T" BIT STATE INDICATOR 
;NULL CHARACTER STRING 



035040 
035040 



035050 001114 
035052 000.16 



01 3746 
012737 
005737 
01 2637 
000453 
022626 
01 2637 
000423 

032777 
001404 
127737 
001465 
105737 
001421 
123737 
101015 
032777 
001404 
013737 
000446 



;*THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 
;*AND LOAD THE TEST NUMBER( $TSTNM) INTO THE DISPLAY REG. ( DISPLAY<7:0> ) 
;*AND LOAD THE ERROR FLAG ($ERFLG) INTO DISPLAY<1 5: 0a> 
;*THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 







;*SW14=1 


LOOP ON TEST 








;*SW1 1»t 


INHIBIT ITERATIONS 






;*SW09«1 


LOOP ON ERROR 








;*SW08«1 


LOOP ON TEST IN 


SWR<7:0> 






;*CALL 










;* SCOPE 


■ -SCOPES 


lOT 






$SC0PE: 










CKSWR 




;;TEST FOR CHANGE IN SOFT-SWR 


040000 


144070 


1$: BIT 


#BIT14,#SWR 


; JLOOP ON PRESENT TEST? 






BNE 


$OVER 


; ; YES IF SW14=1 






;#####START OF 


CODE FOR THE XOR 


TESTER/y#### 






SXTSTR: BR 


6$ 


;;IF RUNNING ON THE "XOR" TESTER CHANGE 










;;THIS INSTRUCTION TO A "NOP" (N0P«240) 


000004 




MOV 


®#ERRVEC,-(SP) 


;;SAVE THE CONTENTS OF THE ERROR VECTOR 


035100 


000004 


MOV 


#5$,(P>#ERRVEC 


; ;SET FOR TIMEOUT 


177060 




TST 


@#177060 


; ;TIME OUT ON XOR? 


000004 




MOV 


{SP)+,®#ERRVEC 


RESTORE THE ERROR VECTOR 






BR 


$SVLAD 


; ;G0 TO THE NEXT TEST 






5$: CMP 


(SP)+,(SP)+ 


;;CLEAR THE STACK AFTER A TIME OUT 


000004 




MOV 


(SP)+,@#ERRVEC 


;; RESTORE THE ERROR VECTOR 






BR 


7$ 


;;LOOP ON THE PRESENT TEST 






6$: ;#####END OF 


:ODE FOR THE XOR 


TESTER##### 


000400 


144022 


BIT 


#BIT08,»SWR 


; ; LOOP ON SPEC. TEST? 






BEQ 


2$ 


; ;BR IF :\o 


144014 


001102 


CMPB 


f>SWR,$TSTNM 


;;0N THE RIGHT TEST? SWR<7:0> 






BEQ 


$OVER 


; ;BR IF YES 


001 103 




2$: TSTB 


$ERFLG 


;;HAS AN ERROR OCCURRED? 






BEQ 


3$ 


; ; BR IF NO 


001 115 


001103 


CMPB 


$ERMAX,$ERFLG 


;;MAX. ERRORS FOR THIS TEST OCCURRED? 






BHI 


3$ 


; ;BR IF NO 


001000 


143764 


BIT 


/i'BITOg,#SWR 


; ; LOOP ON ERROR? 






BEQ 


4$ 


; ; BR IF NO 


001110 


001106 


7$: MOV 


$LPERR,$LPADR 


;;SET LOOP ADDRESS TO LAST SCOPE 






BR 


$OVER 
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SCOPE HANDLER ROUTINE 



l-KTHB 


PI 1 


27-JUN-78 


09:27 


4397 


0351 66 


105D37 


001 103 


4398 


0351 72 


005037 


001212 


4399 


0351 76 


000415 




4400 


035200 


032777 


004000 


4401 


035206 


00 1 01 1 




4402 


035210 


005737 


001 234 


4403 


0352 1 4 


00 1 406 




4404 


0352 1 6 


005237 


001 104 


4405 


035222 


023737 


001212 


4406 


035230 


002024 




4407 


035232 


01 2737 


000001 


4408 


035240 


01 3737 


035316 


4409 


035246 


105237 


001 1 02 


441 


035252 


1 1 3"37 


001 1 02 


441 1 


035260 


01 1 637 


001 106 


441 2 


035264 


01 1637 


001 110 


441 3 


035270 


005037 


001214 


4414 


035274 


1 1 2737 


000001 


4415 


035302 


01 3777 


001 102 


4416 


03531 


01 3716 


001 106 


441 7 


035314 


000005 




4418 


035316 


000200 




4419 








4420 








4421 








4422 








4423 








4424 








4425 








4426 








4427 








4428 








4429 








4430 








4431 








4432 








4433 


035320 






4434 


035320 


104410 




4435 


035322 


01 0037 


001 162 


4436 


035326 


01 01 37 


001 164 


4437 


035332 


01 0237 


001 166 


4438 


035336 


01 0337 


001 1 70 


4439 


035342 


01 0437 


001 1 72 


4440 


035346 


01 0537 


001 174 


4441 


035352 


1 1 3737 


001 102 


4442 


035360 


1 05237 


001 103 


4443 


035364 


001775 




4444 


035366 


013777 


001 102 


4445 


035374 


032777 


002000 


4446 


035402 


001402 




4447 


035404 


104401 


001216 


4448 


035410 


005237 


001 1 12 


4449 


035414 


01 1637 


001 116 


4450 


035420 


162737 


000002 


4451 


035426 


117737 


143464 


4452 


035434 


032777 


020000 



SEQ oosa 



001 104 
001212 



SSVLAD: 



001 115 

143632 $OVER: 



SMXCNT: 
.SBTTL 



CLRB 


SERFLG 


; ;ZER0 THE ERROR FLAG 


CLR 


$TIMES 


;;CLEAR THE NUMBER OF ITERATIONS TO MAKE 


BR 


1$ 


ESCAPE TO THE NEXT TEST 


BIT 


#BIT1 1 ,@SWR 


;;INHIB1T ITERATIONS? 


BNE 


1$ 


; ; BR IF YES 


TST 


$PASS 


;;IF FIRST PASS OF PROGRAM 


BEQ 


1$ 


INHIBIT ITERATIONS 


INC 


$ICNT 


INCREMENT ITERATION COUNT 


CMP 


$TIMES,$ICNT 


SJCHECK THE NUMBER OF ITERATIONS MADE 


BGE 


$OVER 


; ; BR IF MORE ITERATION REQUIRED 


MOV 


#1 ,$ICNT 


REINITIALIZE THE ITERATION COUNTER 


MOV 


SMXCNT, STIMES 


;;SET NUMBER OF ITERATIONS TO DO 


INCB 


STSTNM 


J ;COUNT TEST NUMBERS 


MOVB 


$TSTNM,$TESTN 


;;SET TEST NUMBER IN APT MAILBOX 


MOV 


(SP) ,$LPADR 


;;SAVE SCOPE LOOP ADDRESS 


MOV 


(SP) ,$LPERR 


;;SAVE ERROR LOOP ADDRESS 


CLR 


SESCAPE 


;;CLEAR THE ESCAPE FROM ERROR ADDRESS 


MOVB 


#1 ,$ERMAX 


;:ONLY ALLOW 0NE(1) ERROR ON NEXT TEST 


MOV 


STSTNM, ©DISPLAY 


; ;DISPLAY TEST NUMBER 


MOV 


SLPADR, (SP) 


; ; FUDGE RETURN ADDRESS 


RTI 




; ;FIX£S PS 


200 




;;MAX. NUMBER OF ITERATIONS 


ERROR 


HANDLER ROUTINE 





*THIS ROUTINE WILL INCREMENT THE ERROR PLAG AND THE ERROR COUNT, 
*SAVE THE ERROR ITEM NUMBER AND THE ADDRESS OF THE ERROR CALL 
*AND GO TO ERRTYP ON ERROR 

*THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 

n5«1 HALT ON ERROR 

*SW13«1 INHIBIT ERROR TYPEOUTS 

<«SW10s1 BELL ON ERROR 

«SW09s1 LOOP ON ERROR 

*CALL 



ERROR N 



;ERROR«EMT AND N=ERROR ITEM NUMBER 



SERROR: 



143546 
143536 



001 116 
001114 
143476 



1$: 



CKSWR 




;TEST FOR CHANGE IN SOFT-SWR 




MOV 


RO.SREGO 


SAVE THE CONTENTS OF RO 




MOV 


R1 ,$REG1 


SAVE THE CONTENTS OF R1 




MOV 


R2,$REG2 


SAVE THE CONTENTS OF R2 




MOV 


R3,$REG3 


SAVE THE CONTENTS OF R3 




MOV 


R4,$REG4 


SAVE THE CONTENTS OF R4 




MOV 


R5,SREG5 


SAVE THE CONTENTS OF R5 




MOVB 


STSTNM, TESTNO 


SAVE THE TEST NUMBER 




INCB 


SERFLG 


;SET THE ERROR FLAG 




BEQ 


7$ 


; DON'T LET THE FLAG GO TO ZERO 




MOV 


STSTNM, ©DISPLAY 


; DISPLAY TEST NUMBER AND ERROR 


FLAG 


BIT 


#BIT10,f»SWR 


;BELL ON ERROR? 




BEQ 


1$ 


;N0 - SKIP 




TYPE 


,$BELL 


;RING BELL 




INC 


SERTTL 


; COUNT THE NUMBER OF ERRORS 




MOV 


(SP),$ERRPC 


;GET ADDRESS OF ERROR INSTRUCTION 


SUB 


#2,$ERRPC 






MOVB 


9$ERRPC,$ITEMB 


; STRIP AND SAVE THE ERROR ITEM 


CODE 


BIT 


#BIT13,©SWR 


;SKIP TYPEOUT IF SET 
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SEQ 0093 



4453 


035442 


001004 


4454 


035444 


004737 


4455 


035450 


104401 


4456 


035454 




4457 


035454 


122737 


4458 


035462 


001007 


4459 


035464 


1 1 3737 


4460 


035472 


004737 


4461 


035476 


000 


4462 


035477 


000 


4463 


035500 


000777 


4464 


035502 


005777 


4465 


035506 


100002 


4466 


035510 


000000 


4467 


035512 


104410 


4468 


035514 


032777 


4469 


035522 


001402 


4470 


035524 


01 3716 


4471 


035530 


005737 


4472 


035534 


001402 


4473 


035536 


013716 


4474 


035542 




4475 


035542 


022737 


4476 


035550 


001001 


4477 


035552 


000000 


4478 


035554 




4479 


035554 


000002 


4480 






4401 






4482 






4483 






4484 






4485 






4486 






4487 






4488 






4489 






4490 






4491 






4492 






4493 






4494 






4495 






4496 






4497 






4498 






4499 






4500 


035556 




4501 


035556 


104401 


4502 


035562 


01 0046 


4503 


035564 


005000 


4504 


035566 


153700 


4505 


035572 


001004 


4506 






4507 


035574 


013746 


4508 







; ;SKIP TYPEOUTS 

;;G0 TO USER ERROR ROUTINE 



; RUNNING IN APT MODE 

; NO, SKI. APT ERROR REPORT 

;SET ITEM NUMBER AS ERROR NUMBER 

; REPORT FATAL ERROR TO APT 



; ;APT ERROR LOOP 
; ;HALT ON ERROR 
; ISKIP IF CONTINUE 
; ;HALT ON ERROR! 
;;TEST FOR CHANGE IN SOFT-SWR 
;;LOOP ON ERROR SWITCH SET? 
; ; BR IF NO 

FUDGE RETURN FOR LOOPING 
;; CHECK FOR AN ESCAPE ADDRESS 
; ;BR IF NONE 

;; FUDGE RETURN ADDRESS FOR ESCAPE 

;;act-11 auto-accept? 
; ; branch if no 
; ;yes 

; ; RETURN 

SBTTL ERROR MESSAGE TYPEOUT ROUTINE 

^THIS ROUTINE USES THE "ITEM CONTROL BYTE" (SITEMB) TO DETERMINE WHICH 
♦ERROR IS TO BE REPORTED. IT THEN OBTAINS, FROM THE "ERROR TABLE" (SERRTB), 
*AND REPORTS THE APPROPRIATE INFORMATION CONCERNING THE ERROR. 

♦NOTES: 

*1) THIS ROUTINE PROVIDES AN AUTOMATIC "CARRIAGE RETURN-LINE FEED" 
* FOR "EM", "DH", AND "DT". 

«2) TWO SPACES ARE TYPED AFTER EACH NUMBER FOR "DT" 
«3) FOR $ITEMB«0, JUST THE ERROR PC IS TYPED 
*4) THE AVAILABLE FORMATS FOR TYPING DATA 









BNE 


20$ 


035556 






USR 


PC, ERRTYP 


001223 






TYPE 


.$CRLF 






20$: 






000001 


001246 




CMPB 


#APTENV,$ENV 








BNE 


2$ 


001114 


035476 




MOVB 


SITEMB, 21$ 


040110 






JSR 


PC,$ATY4 






21$: 


.BYTE 











.BYTE 









22$: 


BR 


22$ 


143432 




2$: 


TST 


@SWR 








BPL 


3$ 








HALT 










CKSWR 




001000 


143416 


3$: 


BIT 


#BIT09,eSWR 








BEQ 


4$ 


001110 






MOV 


SLPERR, (SP) 


001214 




4$: 


TST 


SESCAPE 








BEQ 


5$ 


001214 






MOV 


$ESCAPE, (SP) 






5$: 






034760 


000042 




CMP 


#$ENDAD,P#42 








BNE 


6$ 








HALT 








6$: 












RTI 





DF 




TYPE 

MOV 

CLR 

BISB 

BNE 

MOV 



FORMAT 

TYPE A 6 DIGIT OCTAL NUMBER (FROM 16-BIT BINARY) 
TYPE A DECIMAL NUMBER WITHOUT LEADING ZEROS 
TYPE A 16 DIGIT BINARY NUMBER 

TYPE A 6 DIGIT OCTAL NUMBER (FROM 18-BIT BINARY) 



,$CRLF 

RO,-(SP) 

RO 

©iKSlTEMB.RO 
1$ 

£ERRPC,-(SP) 



{"CARRIAGE RETURN" & "LINE FEED" 
jSAVE RO 

;PICKUP THE ITEM INDEX 

;IF ITEM NUMBER IS ZERO, JUST 
;TYPE THE PC OF THE ERROR 
;;SAVE SERRPC FOR TYPEOUT 
; ; ERROR ADDRESS 
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4509 
4510 
451 1 
4512 
4513 
4514 
4515 
4516 
4517 
4518 
4519 
4520 
4521 
4522 
4523 
4524 
4525 
4526 
4527 
4528 
4529 
4530 
4531 
4532 
4533 
4534 
4535 
4536 
4537 
4538 
4539 
4540 
4541 
4542 
4543 
4544 
4545 
4546 
4547 
4548 
4549 
4550 
4551 
4552 
4553 
4554 
4555 
4556 
4557 
4558 
4559 
4560 
4561 
4562 
4563 
4564 



035600 
035602 
035604 
035606 
035610 
035612 
035614 
035620 
035624 
035626 
035630 
035632 
035636 
035642 
035644 
035646 
035650 
035654 
035656 
035660 
035662 
035664 
035666 



035670 
035672 
035674 



035676 
035702 
035704 
035706 
035710 



035712 
035716 
035720 
035722 
035724 



035726 
035730 
035734 
035740 
035744 
035746 

035750 
035752 
035754 
035760 
035762 



01 3146 
104402 
000425 



121027 
001003 
01 3146 
104 .05 
000417 



121027 
001003 
013146 
104406 
00041 1 



;G0 TYPE— OCTAL ASCIKALL DIGITS) 
GET OUT 

ADJUST THE INDEX SO THAT IT WILL 
WORK FOR THE ERROR TABLE 



FORM TABLE POINTER 
PICKUP "ERROR MESSAGE" POINTER 
SKIP TYPEOUT IF NO POINTER 
TYPE THE "ERROR MESSAGE" 
"ERROR MESSAGE" POINTER GOES HERE 
"CARRIAGE RETURN" fi "LINE FEED" 
PICKUP "DATA HEADER" POINTER 
SKIP TYPEOUT IF 
TYPE THE "DATA HEADER" 
"DATA HEADER" POINTER GOES HERE 
"CARRIAGE RETURN" & "LINE FEED" 
SAVE R1 

PICKUP "DATA TABLE" POINTER 
BR IF NO DATA TO BE TYPED 
PICKUP "DATA FORMAT" POINTER 
IS IT FORMAT 0? 
BR IF NO 

;*THIS CODE IS FOR OCTAL (16-BIT) FORMAT (DF«0) 

MOV ©(R1)4-,-(SP) SAVE @(R1 )+ FOR TYPEOUT 

TYPOC ;;G0 TYPE— OCTAL ASCIKALL DIGITS) 

BR 11$ 

;*THIS CODE IS FOR DECIMAL FORMAT (DF=1) 



1 04402 






TYPOC 




000471 








1 3$ 


005300 




1$« 


DEC 




006300 






ASL 


RO 


006300 






ASL 




006300 








RO 


062700 


001412 




ADD 




01 2037 


035630 




MOV 


\ KU J + f d9 


00 1 404 






BEQ 


3$ 


104401 










000000 




2$: 


. WORD 




1 U*fHW 1 


00 1 223 




TYPE 


,$CRLF 


01 2037 


035646 


3$: 


MOV 


(R0)-l-,4$ 


001404 






BEQ 


5$ 


104401 






TYPE 




000000 




4$: 


.WORD 





104401 


001223 




TYPE 


,$CRLF 


010146 




5$: 


MOV 


R1 ,-(SP) 


01 2001 






MOV 


(R0)+,R1 


001441 






BEQ 


12$ 


012000 






MOV 


(RO)+,RO 


105710 




6$: 


TSTB 


(RO) 


001003 






BNE 


7$ 



7$: 



CMPB 

BNE 

MOV 

TYPDS 

BR 



(R0),#1 
B$ 

»(R1)+.~(SP) 
11$ 



;IS IT FORMAT 1? 

; BRANCH IF NO 

;;SAVE @>(R1)+ FOR TYPEOUT 

;;G0 TYPE— DECIMAL ASCII WITH SIGN 



;«THIS CODE IS FOR BINARY FORMAT (DFx2) 
8$: CMPB (R0),(C2 ;IS IT FORMAT 2? 

BNE 9$ {BRANCH IF NO 

MOV ©(R1)+,-(SP) ;; SAVE ®(R1 )+ FOR TYPEOUT 

TYPBN ;;G0 TYPE— BINARY ASCII 

BR 11$ 

;*THIS CODE IS FOR OCTAL (IB-BIT) FORMAT (DF=3) 



012146 
004737 
062716 
012637 
104401 
000000 

00571 1 
001404 
104401 
105720 
000740 



041162 
000005 
035746 



9$: 



MOV 

USR 

ADD 

MOV 

TYPE 

.WORD 

TST 

BEQ 

TYPE 

TSTB 

BR 



(R1)+,-(SP) 
PC,$DB2Q 
#5,(SP) 
(SP)-t-,10$ 



<R1) 

12$ 

,14$ 

(R0)4. 

6$ 



;PUT ADDRESS OF FIRST LOC. ON STACK 
; CONVERT TWO LOGS. TO AN ASCII STRING 
;ONLY NEED 6 CHARACTERS NOT 11 
;PUT ADDRESS OF ASCII CHARS. AT 10$ 
;TYPE OCTAL VALUE OF IB-BIT BINARY NO. 



;IS THERE ANOTHER NUMBER? 
;BR IF NO 

JTYPE TW0(2) SPACES 

; POINT TO NEW "DATA FORMAT" 

{LOOP 
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4565 








4566 


035764 


01 2601 




4567 


035766 


012500 




4568 


035770 


104401 


001223 


4569 


035774 


000207 




4570 


035776 


020040 


000 


4571 




036002 




4572 









12$: 
13$: 



MOV 

MOV 

TYPE 

HTS 

.ASCIZ 

.EVEN 



(SP)+,R1 
(SP)-t-,RO 
,$CRLF 
PC 

/ / 



{RESTORE R1 
{RESTORE RO 
{"CARRIAGE RETURN" & 
{RETURN 

;TW0(2) SPACES 
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SEQ 00S6 



4573 
4574 
4575 
4576 
4577 
4578 
4579 
4580 
4581 
4582 
4583 
4584 
4585 
4586 
4587 
4588 
4589 
4590 
4591 
4592 
4593 
4594 
4595 
4596 
4597 
4598 
4599 
4600 
4601 
4602 
4503 
4604 
4605 
4606 
4607 
4608 
4609 
4610 
461 1 
4612 
4613 
4614 
4615 
4616 
4617 
4618 
4619 
4620 
4621 
4622 
4623 
4624 
4625 
4626 
4627 
4628 



036036 
036044 
036046 
036052 
036060 
036064 
036066 



036070 
036074 
036100 
036104 
036106 
0361 12 
0361 16 
036122 



.SBTTL ***** SUBROUTINES USED BY THIS PROGRAM 



.SBTTL TURN OFF T-BIT AND SAVE CURRENT PSW 



THIS SUBROUTINE IS USED TO TURN wFF THE TRACE TRAP BIT IN THE PSW 
IF IT IS ON. THE PROCESSOR STATUS IS SAVED IN «TBITPS" SO THAT 







; ♦ 


THE PSW 


CAN BE RESTORED 


TO ITS PREVIOUS CONDITION WHEN CONDITIONS 






; * 


WARRANT 


T-BIT TRAPPING. 












036002 


033727 


177776 000020 TOFF: 


BIT 


PSW,#TBIT 


; IS THE T-BIT SET IN THE PSW? 


036010 


00141 1 




BEQ 


1$ 


JEXIT IF NO 


036012 


01 3746 


177776 


MOV 


PSW,-{SP) 


; PUSH PRESENT PSW ON THE STACK 


036016 


01 1637 


001372 


MOV 


(SP),TBITPS 


;ALSO SAVE IT IN "TBITPS" FOR 












JRESTORING LATER 


036022 


042716 


000020 


BIC 


#TBIT, (SP) 


;CLEAR THE T-BIT (BIT 4) IN THE PSW 


036026 


012746 


036034 


MOV 


iflS.-CSP) 


; PUSH PC OF "RTS" ON STACK 


036032 


000006 




RTT 




; "RETURN" TO 1$ WITH T-BIT OFF 


036034 


000207 


IS: 


RTS 


PC 


; RETURN TO PROGRAM 



033727 001372 
001410 

013746 001372 
012737 000340 
012746 036066 
000006 
000207 



SBTTL TURN ON T-BIT AND RESTORE PREVIOUS PSW 

* 

« THIS SUBROUTINE IS USED TO RESTORE THE PROCESSOR STATUS TO ITS 

« PREVIOUS CONDITION BY RESTORING THE "T-BIT PSW" SAVED BY THE 

* "TOFF" SUBROUTINE IN THE "TBITPS" LOCATION. 

* 

000020 ton: BIT TBITPS, #TBIT ;WAS T-BIT ON IN THE PREVIOUS PSW? 

BEQ IS ;EXIT IF NO 

MOV TBITPS, -(SP) ; PUSH PREVIOUS PSW ON THE STACK 

001372 MOV #340, TBITPS jRESET THE "TBITPS" LOCATION 

MOV #1$,-(SP) ; PUSH PC OF "RTS" ON STACK 

RTT ; "RETURN" TO 1$ WITH T-BIT RESTORED 

is: RTS PC ; RETURN TO PROGRAM 

.SBTTL SET ALL WRITEABLE BITS iN ALL PAR/PDR'S 

THIS SUBROUTINE IS USED BY THE PAR/PDR DUAL ADDRESSING TEST 
TO SET ALL WRITEABLE BITS IN ALL KERNEL AND USE PAR'S AND 
PDR'S TO A 1. THE "INITIAL STATE" OF HAVING ALL BITSal IS 
USED TO SEE THAT ONLY ONE REGISTER IS CLEARED IN RESPONSE TO 
A SINGLE PAR OR PDR ADDRESS. 



« « 4i « 4c « « « « « 4i 



01 2702 
012701 
012721 
077203 
01 2*^02 
01 2701 
012721 
077203 



000010 
172300 
177777 

000010 
172340 
177777 



SETREG: MOV #10, R2 ; LOAD LOOP COUNTER WITH AN 6 

MOV #KIPDR0,R1 ;LOAD ADDRESS OF FIRST PDR INTO R1 

1$: MOV #-1 , (R1 )+ ;SET BITS IN KERNEL PDR TO 1 

SOB R2,1$ JLOOP TO 1$ UNTIL ALL KERNEL PDR'S 

MOV #10, R2 ;LOAD LOOP COUNTER WITH AN 8 

MOV #KIPAR0,R1 JLOAD ADDRESS OF FIRST PAR INTO Rl 

as: MOV #-1,(R1)-i- ;SET BITS IN A KERNEL PAR TO 1 

SOB R2,2$ ;L00P TO 2$ UNTIL ALL KERNEL PAR'S 
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SEO 0097 



4629 


036124 


01 2702 


000010 


4630 


0361 30 


01 2701 


177600 


4631 


036134 


01 2721 


177777 


4632 


036140 


077203 




4633 


036142 


01 2702 


000010 


4634 


036146 


01 2701 


177640 


4635 


036152 


012721 


177777 


4636 


036156 


077203 




4637 


036160 


000207 




4638 








4639 








4640 








4641 








4642 








4643 








4644 








4645 








4646 








4647 








4648 








4649 


036162 






4650 


036162 


01 2701 


172300 


4651 


036166 


012704 


000010 


4652 


036172 


012705 


077416 


4653 


036176 


01 1 102 




4654 


036200 


020205 




4655 


036202 


001403 




4656 


036204 


020100 




4657 


036206 


001401 




4658 


036210 


104016 




4659 








4660 








4661 








4662 


036212 


062,01 


000002 


4663 


036216 


07741 1 




4664 


036220 


012701 


172340 


4665 


036224 


01 2704 


000010 


4666 


036230 


01 2705 


007777 


4667 


036234 


01 1 102 




4668 


036236 


020205 




4669 


036240 


001403 




4670 


036242 


020100 




4571 


036244 


001401 




4672 


036246 


104016 




4673 








4674 








4675 








4676 


036250 


062701 


oooooa 


4677 


036254 


077411 




4678 


036256 


01 2701 


177600 


4679 


036262 


01 2704 


000010 


4680 


036266 


01 2705 


077416 


4681 


036272 


Oil 102 




4682 


036274 


020205 




4683 


036276 


001403 




4684 


036300 


020100 





MOV 


#10, R2 


;LOAD LOOP COUNTER WITH AN 


8 


MOV 


#UIPDR0,R1 


;LOAD ADDRESS OF FIRST PDR 


INTO Rl 


MOV 


#-1 , (Rl )♦ 


;SET BITS IN A USER PDR TO 


1 


SOB 


R2,3$ 


;LOOP TO 3$ UNTIL ALL USER 


PDR'S LOADED 


MOV 


#10, R2 


;LOAD LOOP COUNTER WITH AN 


8 


MOV 


#UIPAR0,R1 


;LOAD ADDRESS OF FIRST PAR 


INTO Rl 


MOV 


#-1 ,(R1 )+ 


;SET BITS IN A USER PAR TO 


1 


SOB 


R2,4$ 


;LOOP TO 4$ UNTIL ALL USER 


PAR'S LOADED 


RTS 


PC 


; RETURN TO TEST 





.SBTTL 



READ & COMPARE KERNEL & USER PAR/PDR'S 



« * i» « Dr * * « * 4i « « 



THIS SUBROUTINE IS USED BY PAR/PDR DUAL ADDRESSING TEST TO 
READ ALL THE PAR'S AND PDR'S TO SEE THAT ONLY ONE REGISTER 
WAS CLEARED IN RESPONSE TO A SINGLE PAR OR PDR ADDRESS. 
ANY FAILURES FOUND BY THE PAR/PDR DUAL ADDRESSING TEST WILL 
BE REPORTED BY THIS SUBROUTINE. 



CMPREO: 



5$: 



MOV 


#KIPDR0,R1 


JLOAD ADDRESS OF FIRST KERNEL PDR IN Rl 


MOV 


#10,R4 


JLOAD LOOP COUNTER WITH AN 8 


MOV 


#77416, RS 


;PUT EXPECTED PDR CONTENTS IN R5 


MOV 


(Rl ),R2 


JREAD A KERNEL PDR INTO R2 


CMP 


R2,R5 


;ARE ALL WRITEABLE BITS SET AL EXPECTED? 


BEQ 


2$ 


; BRANCH IF YES 


CMP 


Rl ,R0 


;WAS IT THE REG. THAT WAS CLEARED? 


BEQ 


2$ 


.BRANCH IF YES 


ERROR 


16 


,A PDR WAS EFFECTED BY CLEARING A DIFFERENT 






FOR TIGHTER SCOPE LOOP 






REPLACE ERROR CALL WITH 






AN "RTS PC" = 000207 


ADD 


#2,R1 


FORM NEXT KERNEL PDR ADDRESS 


SOB 


R4,1$ 


LOOP TO 1$ UNTIL ALL KERNEL PDR'S CHECKED 


MOV 


#KIPAR0,R1 


LOAD ADDRESS OF FIRST KERNEL PAR IN Rl 


MOV 


#10,R4 


LOAD LOOP COUNTER WITH AN 8 


MOV 


#7777, RS 


PUT EXPECTED PAR CONTENTS IN R5 


MOV 


(Rl ),R2 


READ A KERNEL PAR INTO R2 


CMP 


R2,R5 


ARE ALL WRITEABLE BITS SET AS EXPECTED? 


BEQ 


4$ 


BRANCH IF YES 


CMP 


Rl ,R0 


WAS IT THE REG. THAT WAS CLEARED? 


BEQ 


4$ 


BRANCH IF YES 


ERROR 


.6 


A PAR WAS EFFECTED BY CLEARING A DIFFENENT 






FOR TIGHTER SCOPE LOOP 






REPLACC ERROR CALL WITH 






AN "RTS PC" = 000207 


ADD 


#2,R1 


FORM NEXT KERNEL PAR ADDRESS 


SOB 


R4,3$ 


LOOP TO 3$ UNTIL ALL KERNEL PAR' S CHECKED 


MOV 


#UIPDR0,R1 


LOAD ADDRESS OF FIRST USER PDR IN Rl 


MOV 


#10, R4 


LOAD LOOP COUNTER WITH AN 8 


MOV 


#77416, R5 


PUT EXPECTED PDR CONTENTS IN R5 


MOV 


(Rl ),R2 


READ A USER PDR INTO R2 


CMP 


R2,R5 


ARE ALL WRITABLE BITS SET AS EXPECTED? 


BEQ 


6$ 


BRANCH IF YES 


CMP 


Rl ,R0 


WAS IT THE REG. THAT WAS CLEARED? 
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SEQ 0098 



4 685 
4686 
4687 
4688 
4689 
4690 
4691 
4692 
4693 
4694 
4695 
4696 
4697 
4698 
4699 
4700 
4701 
4702 
4703 
4704 
4705 
4706 
4707 
4708 
4709 
4710 
471 1 
4712 
4713 
4714 
4715 
4716 
4717 
4718 
4719 
4720 
4721 
4722 
4723 
4724 
4725 
4726 
4727 
4728 
4729 
4730 
4731 
4732 
4733 
4734 
4735 
4736 
4737 
4738 
4739 
4740 



036302 
036304 



036306 
036312 
036314 
036320 
036324 
036330 
036332 
036334 
036336 
036340 
036342 



036344 
036350 
036352 



036354 
036360 
036366 
036370 
036374 
036400 
036404 
036410 
036412 
036414 
036416 
036424 
036432 
036436 
036442 
036446 



001401 
104016 



062701 
07741 1 
01 2701 
01 2704 
01 2705 
01 1 102 
020205 
001403 
020 00 
001401 
104016 



062701 
07741 1 
000207 



177640 
000010 
007777 



172340 
140000 



012702 
032737 
001402 
01 2702 
013700 001402 
072027 177764 
042700 177761 
060002 
01 1200 
01 0002 

013737 001402 
042737 160000 
072227 177766 
042702 177774 
072027 000006 
042700 000077 



7S: 



8$: 



BEQ 
ERROR 



ADD 
SOB 
MOV 
MOV 
MOV 
MOV 
CMP 
BEQ 
CMP 
BEQ 
ERROR 



ADD 
SOB 
RTS 



6$ 
16 



#2,R1 
R4,5$ 

jl'UIPARO.RI 

#10,R4 

#7777, R5 

(R1),R2 

R2,R5 

B$ 

R1 ,R0 

8$ 

16 



#2,R1 
R4,7$ 
PC 



BRANCH IF YES 

A PDR WAS EFFECTED BY CLEARING A DIFFERENT PAR/PDR 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

AN "RTS PC" = 000207 

FORM NEXT USER PDR ADDRESS 

LOOP TO 5$ UNTIL ALL USER PDR ' S CHECKED 

LOAD ADDRESS OF FIRST USER PAR IN R1 

LOAD LOOP COUNTER WITH AN 8 

PUT EXPECTED PAR CONTENTS IN R5 

READ A USER PAR INTO R2 

ARE ALL WRITEABLE BITS SET AS EXPECTED? 
BRANCH IF YES 

WAS IT THE REG. THAT WAS CLEARED? 
BRANCH IF YES 

A PAR WAS EFFECTED BY CLEARING A DIFFERENT PAR/PDR 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

AN "RTS PC" = 000207 

FORM NEXT USER PAR ADDRESS 

LOOP TO 7$ UNTIL ALL USER PAR'S CHECKED 

RETURN TO TEST 



CONVERT 'IRTUAL ADDRESS TO PHYSICAL ADDRESS 

«*«>»«««****««**4ii«i«*4i4>i»*4i4i4iitii|<i(<i»4,4>*v*4i«**4t*«4t«**i|i*4>>«i4<4>4i*4r*4i<|r 

THIS SUBROUTINE IS USED TO FORM AN 18-BIT PHYSICAL ADDRESS 

(PBA) FROM THE 16-BIT VIRTUAL ADDRESS (VBA) AND THE APPROPRIATE 

PAGE ADDRESS REGISTER (PAR). THE SAME METHOD USED BY THE MEMORY 

MANAGEMENT LOGIC IS USED. VBA <15:13> SELECTS WHICH PAR/PDR 

IS TO BE USED, VBA <5:0>+PBA <5:0>, AND VBA <12:6> IS ADDED 

TO PAR <1l:00> TO GIVE PBA <17:6>. BITS <17:i6> OF THE 

PHYSICAL ADDRESS ARE LEFT IN LOC. "PBAHI" AND BITS <15:00> 

ARE LEFT IN LOC. "PBALO". THE PSW'S "CURRENT MODE" BITS 

ARE USED TO SELECT THE KERNEL OR USER PAR/PDR'S. THE ROUTINE 

IS ENTERED WITH LOC. "VIRTI" CONTAINING THE 16-BIT VIRTUAL 

ADDRESS. 



001406 
001 40r. 



formpa: 


MOV 


iCKIPARO.Ra 


;LOAD ADDRESS OK FIRST KERNEL PAR IN R2 




BIT 


#1 40000, PSW 


; IN USER MODE? 




BEQ 


1$ 


; BRANCH IF NO 




MOV 


#UIPAR0,R2 


;LOAD ADDRESS OF FIRST USER PAR IN R2 


is: 


MOV 


VIRTI ,R0 


;LOAD VIRTUAL ADDR. (VBA) INTO RO 




ASH 


#-14, RO 


;GET BITS <15:13> DOWN TO BITS <3:i> 




BIC 


#177761 ,R0 


;MASK OF ALL BITS BUT BITS <3:i> 




ADD 


R0,R2 


;ADD OFFSET TO BASE PAR ADDRESS 




MOV 


(R2),R0 


;GET BITS <1i:00> FROM APPROPRIATE PAR 




MOV 


R0,R2 


JCOPY PAR BITS <1l:00> INTO R2 




MOV 


VIRTI , PBALO 


;PUT VIRTUAL ADDR. IN LOC. "PBALO" 




BIC 


#160000, PBALO 


•,CLEAR OFF BITS <15:13> OF ORIGINAL VBA 




ASH 


#-12, R2 


JGET PAR <1i:00> DOWN TO BITS <1:0> OF R2 




BIC 


#177774, Ra 


JCLEAR OFF ALL BITS BUT BITS <i:0> 




ASH 


#6,R0 


;SHIFT PAR<9:0> TO <15:6> OF RO 




BIC 


#77, RO 


;CLEAR BITS <5:0> OF RO 
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SEQ 0099 



4741 
4742 
4743 
4744 
4745 
4746 



036452 060037 001406 



036456 
036460 
036464 



005502 
010237 
000207 



ADC 
MOV 
RTS 



RO, PBALO 
R2 

.'t2,PBAHX 
PC 



J IN EFFECT, ADD VBA<12:0> TO PAR<9:0> 
;(PAR<9:0> IN BITS <15:6> OF RO) 
;ADD ANY CARRY TO R2 

;PUT BITS <17:16> OF PHYSICAL ADDR. IN PBAHI 
; RETURN TO PROGRAM 
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SiQ 01 GO 



4747 

4748 

4749 

4750 

4751 

4752 

4753 

4754 

4755 

4756 

4757 

4758 

4759 

4760 

4761 

4762 

4763 

4764 

4765 

47G6 

4767 

4768 

4769 

4770 

4771 

4772 

4773 

4774 

4775 

4776 

4777 

4778 

4779 

4780 

4781 

4782 

4783 

4784 

4785 

4786 

4787 

4788 

4789 

4790 

4791 

4792 

4793 

4794 

4795 

4796 

4797 

4798 

4799 

4800 

4801 

4802 



036466 
036474 
036476 
035502 
036504 
036510 
036514 
036520 
036522 
03G530 

036532 
036536 
036542 
036546 
036550 
036554 
03S555 
036560 
036564 

036566 
036572 

036576 
036602 
036604 
035610 
036614 
036622 
036624 
036632 



03663G 
035642 
036644 
035650 
036654 



036656 
036662 
036664 
036670 
036672 



022737 
00 111 4 
105777 
10011 1 
1 1 7746 
042716 
022726 
001 102 
123727 
C01476 

104401 
104401 
013746 
104402 
104401 
005046 
005046 
105777 
100375 

11 7746 
042716 

021627 
001015 
104401 
062706 
123727 
001003 
01 2777 
000137 



000176 001140 

142442 

142436 
177600 
000007 

001134 000001 



037430 
037435 
000176 



.SBTTL TTY INPUT ROUTINE 
.ENABL LSB 

;*SOFTWARE SWITCH REGISTER CHANGE ROUTINE. 
!*R0UTINE IS ENTERED FROM THE TRAP HANDLER, AND WILL 
;«SERVICE THE TEST FOR CHANGE IN SOFTWARE SWITCH REGISTER TRAP CAU 
;*WHEN OPERATING IN TTY FLAG MODE. 
$CKSWR: 



19$: 
7$! 



142354 
177600 



037416 
000006 
001135 

000100 
037460 



000001 
142312 



021627 000025 
001005 

104401 037423 
062706 000006 
000737 



021627 000015 
001022 

005766 000004 



001403 
016677 



000002 142240 



CMP 


tfSWREG, SWR 


;;IS THE SOFT-SWR SELECTED? 


BNE 


15$ 


; ; BRANCH IF NO 


TSTB 


@$TKS 


; JCHAR THERE? 


BPL 


15$ 


;;IF NO, DON'T WAIT AROUND 


MOVB 


p$TKB,-(SP) 


; ; SAVE THE CHAR 


BIC 


*"C177, (SP) 


;;STRIP-'OFF THE ASCII 


CMP 


#7, (SP)-f 


;;IS IT A CQ^TROL G? 


BNE 


15$ 


;;N0, RETURN TO USER 


CMPB 


$AUT0B,#1 


;;ARE WE RUNNING IN AUTO-MODE? 


BEO 


15$ 


; ; BRANCH I F YES 


TYPE 


,$CNTLG 


; ; ECHO THE CONTROL-G ("Q) 


TYPE 


,$MSWR 


;;TYPE CURRENT CONTENTS 


MOV 


SWREG.-tSP} 


;;SAVE SWREG FOR TYPEOUT 


TYPOC 




;jGO TYPE— OCTAL ASCXI(ALL DIGITS) 


TYPE 


,$MNEW 


; ; PROMPT FOR NEW SWR 


CLR 


-(SP) 


;;CLEAR COUNTER 


CLR 


-(SP) 


; ;THE NEW SWR 


TSTB 


f)$TKS 


5 ; CHAR THERE? 


BPL 


7$ 


; ; IF NOT TRY AGAIN 


MOVB 


9>$TKB,-(SP) 


; ; PICK UP Char 


BIC 


#"C177, (SP) 


; ;MAKE IT 7-BIT ASCII 


CMP 


(SP),#3 


; ; IS IT A CONTROL-C? 


BNE 


9$ 


; ; BRANCH IF NOT 


TYPE 


,$CNTLC 


;;YES, ECHO CONTROL-C (*C) 


ADD 


#6,SP 


; ; CLEAN UP STACK 


CMPB 


$INTAG,#1 


;;REENABLE TTY KEYBOARD INTERRUPTS? 


BNE 


8$ 


; ; BRANCH IF NO 


MOV 


#100,fi$TKS 


ALLOW TTY KEYBOARD INTERRUPTS 


UMP 


CNTRLC 


; ; CONTROL-C RESTART 


CMP 


(SP),#25 


; ; IS IT A CONTROL-U? 


BNE 


10$ 


; ; BRANCH IF NOT 


TYPE 


,$CNTLU 


;;YES, ECHO CONTROL-U ("U) 


ADD 


*6,SP 


IGNORE PREVIOUS INPUT 


BR 


19$ 


;; LET'S TRY IT AGAIN 


CMP 


(SP),#15 


; ; IS IT A <CR>? 


BNE 


16$ 


; {BRANCH IF NO 


TST 


4(SP) 


;;YES, IS IT THE FIRST CHAR? 


BEO 


11$ 


J ; BRANCH IF YES 


MOV 


2(SP),fiSWR 


;;SAVE NEW SWR 
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SEQ 0101 



4803 


036700 


062706 


000006 


4804 


036704 


104401 


001223 


4805 


036710 


123727 


001135 


4806 


036716 


001003 




4807 


036720 


01 2777 


000100 


4808 


036726 


000002 




4809 


036730 


004737 


040022 


4810 


036734 


021627 


000060 


481 1 


036740 


002420 




4012 


036742 


021627 


000067 


4813 


036746 


003015 




4814 


036750 


042726 


000060 


4815 


036754 


005766 


000002 


4016 


036760 


001 ;03 




4017 


036762 


006316 




4818 


036764 


006316 




4819 


036766 


006316 




4820 


036770 


005266 


000002 


4821 


036774 


056616 


177776 


4822 


037000 


000667 




4823 


037002 


104401 


001222 


4824 


037006 


000720 




4825 








4826 








4327 








4828 








4829 








4830 








4831 








4832 








4833 








4834 








4835 








4836 


037010 


01 1646 




4837 


037012 


016666 


000004 


4838 


037020 


105777 


142120 


4839 


037024 


100375 




4840 


037026 


1 1 7766 


142114 


4841 


037034 


042766 


177600 


4842 


037042 


026627 


000004 


4843 


037050 


001013 




4844 


037052 


105777 


142066 


4845 


037056 


100375 




4846 


037060 


1 1 7746 


142062 


4847 


037064 


042716 


177600 


4848 


037070 


022627 


000021 


4849 


037074 


001366 




4850 


037076 


000750 




4851 


037100 


026627 


000004 


4852 


037106 


002407 




4853 


0371 10 


026627 


000004 


4854 


0371 16 


003003 




4855 


037120 


042766 


000040 


4856 


037126 


000002 




4857 








4858 









142216 



11$: 


ADD 


ii'6,SP 


; ;CLEAR UP STACK 


14$: 


TYPE 


,$CRLF 


; ; ECHO <CR> AND <LF> 




CMPB 


$INTAG,il'1 


;; RE-ENABLE TTY KBD INTERRUPTS? 




BNE 


15$ 


; ; BRANCH IF NOT 




MOV 


#100,i>$TKS 


;; RE-ENABLE TTY KBD INTERRUPTS 


15$: 


RTI 




; ; RETURN 


16$: 


USR 


PC,$TYPEC 


; ;ECHO CHAR 




CMP 


(SP) ,#60 


; jCHAR < 0? 




BLT 


18$ 


; ; BRANCH IF YES 




CMP 


(SP) ,#67 


; jCHAR > 7? 




BGT 


18$ 


; ; BRANCH IF YES 




BIC 


*60, (SP)* 


; ;STRIP-OFF ASCII 




TST 


2(SP) 


; ; IS THIS THE FIRST CHAR 




BEQ 


17$ 


; ; BRANCH IF YES 




ASL 


(SP) 


; ;N0, SHIFT PRESENT 




ASL 


(SP) 


; ; CHAR OVER TO MAKE 




ASL 


(SP) 


; ; ROOM FOR NEW ONE. 


17$: 


INC 


2(SP) 


; ;KEEP COUNT OF CHAR 




BIS 


-2(SP),(SP) 


; '.SET IN NEW CHAR 




BR 


7$ 


; ;QET THE NEXT ONE 


18$: 


TYPE 


,$QUES 


; ;TYPE ?<CR><Lr> 




BR 


20$ 


; ; SIMULATE CONTROL-U 


.DSABL 


LSB 






•J************************************************************** 


;*THIS 


ROUTINE 


WILL INPUT A 


SINGLE CHARACTER FROM THE TTY 


;*CALL: 








! * 


RDCHR 




INPUT A SINGLE CHARACTER FROM 


J * 


RETURN 


HERE 


JjCHARACTER IS ON THE STACK 


! * 






; ;WITH PARITY BIT STRIPPED OFF 



SRDCHRi 
1$: 



000004 
000004 
000023 



•*«**' 
*TH1S 



MOV 

MOV 

TSTB 

BPL 

MOVB 

BIC 

CMP 

BNE 

TSTB 

BPL 

MOVB 

BIC 

CMP 

BNE 

BR 

CMP 

BLT 

CMP 

BGT 

BIC 

RTI 

ROUTINE 



; ; PUSH DOWN THE PC 
; ;SAVE THE PS 
;;WAIT FOR 
; ; A CHARACTER 
; ;READ THE TTY 
; ;GET RID OF UUNK IF ANY 
; ; IS IT A COWTROL-S? 
; ; BRANCH IF NO 
; ;WAIT FOR A CHARACTER 
; ; LOOP UNTIL ITS THERE 
; ;GET CHARACTER 
; {MAKE IT 7-BIT ASCII 
; ; IS IT A CONTROL-O? 
; ; IF NOT DISCARD IT 
;;YES, RESUME 
; ; IS IT UPPER CASE? 
; ; BRANCH IF YES 
5 ; IS IT A SPECIAL CHAR? 
; {BRANCH IF YES 
; {MAKE IT UPPER CASE 
{ {GO BACK TO USER 

(0<^0*ttii^^iiH^0 ************************ ************ 

WILL INPUT A STRING FROM THE TTY 



(SP),-(SP) 
4(SP) ,2(SP) 
l»$TKS 
1$ 

«>$TKB,4(SP) 
#"C<177>,4(SP) 
4(SP) ,#23 
3$ 

@$TKS 
2$ 

f>$TKB,-(SP) 

#"C177, (SP) 

(SP)-»-,#21 

2$ 

1$ 

4(SP) ,#140 
4$ 

4(SP) ,#175 
4$ 

#40,4(SP) 
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SEQ 0102 



4059 










5*CALL: 






4060 










• * 


RDLIN 




4061 










• * 


RETURN 


HRRE 


4862 










; * 






4863 
















4864 


037130 


01 0346 






$rdlin: 


MOV 


R3,-(SP) 


4865 


037132 


005046 








CLR 


-(SP) 


4866 


037134 


012703 


037406 




is: 


MOV 


*$TTYIN,R3 


4867 


037140 


022703 


037416 




2$: 


CMP 


#$TTYIN+8. .R3 


41368 


037144 


101467 








BLOS 


4$ 


4069 


037146 


104411 








RDCHR 




4070 


037150 


1 1 2613 








MOVB 


(SP)4-,(R3) 


4871 


037152 


122713 


000003 






CMPB 


#3.(R3) 


4872 


037156 


001006 








BNE 


10$ 


4873 


037160 


104401 


037416 






TYPE 


,$CNTLC 


4874 


037164 


005726 








TST 


{SP) + 


4875 


037166 


01 2603 








MOV 


(SP)+,R3 


4876 


0371 70 


000137 


037460 






JMP 


CNTRLC 


4377 


037174 


122713 


000177 




10$: 


CMPB 


#177, {R3) 


487B 


037200 


001022 








BNE 


5$ 


4879 


037202 


005716 








TST 


(SP) 


4880 


037204 


001007 








BNE 


6$ 


4881 


037206 


1 1 2737 


000134 


037404 




MOVB 


#'\,9$ 


4882 


037214 


104401 


037404 






TYPE 


,9$ 


4883 


037220 


012716 


177777 






MOV 


#-1.(SP) 


4884 


037224 


005303 






6$: 


DEC 


R3 


4885 


037226 


020327 


037406 






CMP 


R3,f$TTYlN 


4886 


037232 


103434 








BLO 


4$ 


4887 


037234 


1 1 1337 


037404 






MOVB 


(R3),9$ 


4888 


037240 


104401 


037404 






TYPE 


.9$ 


4889 


037244 


000735 








BR 


2$ 


4890 


037246 


005716 






5$: 


TST 


(SP) 


4891 


037250 


001406 








BEQ 


7$ 


4892 


037252 


1 1 2737 


000134 


037404 




MOVB 


A"\,9$ 


4893 


037260 


104401 


037404 






TYPE 


,9$ 


4894 


037264 


005016 








CLR 


(SP) 


4895 


037266 


122713 


000025 




7$: 


CMPB 


#25, (R3) 


4896 


037272 


001003 








BNE 


8$ 


4897 


037274 


104401 


037423 






TYPE 


,$CNTLU 


4898 


037300 


000715 








BR 


1$ 


4899 


037302 


122713 


000022 




8$: 


CMPB 


#22, (R3) 


4900 


037306 


00101 1 








BNE 


3$ 


4901 


037310 


105013 








CLRB 


(R3) 


4902 


037312 


104401 


001223 






TYPE 


,$CRLF 


4903 


037316 


104401 


037406 






TYPE 


,$TTYIN 


4904 


037322 


000706 








BR 


2$ 


4905 


037324 


104401 


001222 




4$: 


TYPE 


,$QUES 


4906 


037330 


000701 








BR 


1$ 


4907 


037332 


1 1 1337 


037404 




3$: 


MOVB 


(R3),9$ 


4908 


037336 


104401 


037404 






TYPE 


,9$ 


4909 


037342 


122723 


000015 






CMPB 


#15,(R3)4- 


4910 


037346 


001274 








BNE 


2$ 


4911 


037350 


105'^63 


177777 






CLRB 


-1(R3) 


4912 


037354 


104401 


001224 






TYPE 


,$LF 


4913 


037360 


005726 








TST 


(SP)-*- 


4914 


037362 


012603 








MOV 


(SP)-l-,R3 



; INPUT A STRING FROM THE TTY 

; ADDRESS OF FIRST CHARACTER WILL BE ON THE STACK 
[TERMINATOR WILL BE A BYTE OF ALL O'S 

SAVE 

CLEAR THE RUBOUT KEY 
GET ADDRESS 
BUFFER FULL? 
BR IF YES 

GO READ ONE CHARACTER FROM THE TTY 

GET CHARACTER 

IS IT A CONTROL-C? 

BRANCH IF NO 

TYPE A CONTROL-C ("O 

CLEAN RUBOUT KEY OFF OF THE STACK 

RESTORE R3 

GOTO CONTROL-C RESTART 
IS IT A RUBOUT 
BR IF NO 

IS THIS THE FIRST RUBOUT? 
BR IF NO 

TYPE A BACK SLASH 

[SET THE RUBOUT KEY 
I BACKUP BY ONE 
; STACK EMPTY? 
IBR IF YES 

[SETUP TO TYPEOUT THE DELETED CHAR. 
;G0 TYPE 

;G0 READ ANOTHER CHAR. 
; RUBOUT KEY SET? 
I BR IF NO 

;TYPE A BACK SLASH 

CLEAR THE RUBOUT KEY 
IS CHARACTER A CTRL U? 
BR IF NO 

TYPE A CONTROL "U« 

GO START OVER 

IS CHARACTER A ""R"? 

BRANCH IF NO 

CLEAR THE CHARACTER 

TYPE A "CR" & "LF" 

TYPE THE INPUT STRING 

GO PICKUP ANOTHER CHACTER 

TYPE A '?' 

CLEAR THE BUFFER AND LOOP 
ECHO THE CHARACTER 

iCHECK FOR RETURN 

I LOOP IF NOT RETURN 

ICLEAR RETURN (THE 15) 

ITYPE A LINE FEED 

; CLEAN RUBOUT KEY FROM THE STACK 

[RESTORE R3 
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SEO 0103 



4915 
4916 
4917 
4918 
4919 
4920 
4921 
4922 
4923 
4924 
4925 
4926 
4927 
4928 
4929 
4930 
4931 
4932 
4933 
4934 



037364 
037366 
037374 
037402 
037404 
037405 
037406 
037416 
037423 
037430 
037435 
037442 
037446 
037454 



01 1546 
01 6566 
01 2766 
000002 

000 

000 
000010 
041536 

136 
043536 

015 
036440 
020040 
020075 
037460 



000004 
037406 



005015 
006525 
005015 
051412 
000040 
042516 
000 



000002 
000004 



$ttyin: 

000 SCNTLC: 

000012 $CNTLU: 

000 SCNTLG: 

051127 SMSWR: 

020127 $MNEW: 

.EVEN 

.SBTTL 



MOV 

MOV 

MOV 

RTI 

.BYTE 

.BYTE 

.BLKB 

.ASCIZ 

.ASCIZ 

.ASCIZ 

.ASCIZ 



(SP),-(SP) 
4(SP) ,2(SP) 
#$TTYIN,4(SP) 



8. 

/"C/<15><12> 
/-U/<15><12> 
/'•G/<15><12> 
<15><12>/SWR a 



.ASCIZ / NEW « / 



[ADJUST THE STACK AND PUT ADDRESS OF THE 
[ FIRST ASCII CHARACTER ON IT 

[RETURN 

[STORAGE FOR ASCII CHAR. TO TYPE 
[TERMINATOR 

[RESERVE 8 BYTES FOR TTY INPUT 
[CONTROL "C" 
;CONTROL "U" 
[CONTROL "G" 



CONTROL-C SERVICING ROUTINE 

THE FOLLOWING CODE IS EXECUTED WHEN A CONTROL-C HAS 
BEEN TYPED INSTEAD OF A NEW SWITCH RFG. VALUE. 
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SEQ 0104 



4935 
4936 
4937 
4938 
4939 
4940 
4941 
4942 
4943 
4944 
4945 
4946 
4947 
4948 
4949 
4950 
4951 
4952 
4953 
4954 
4955 
4956 
4957 
4958 
4959 
4960 
4961 
4962 
4963 
4964 
4965 
4966 
4967 
4968 
4969 
4970 
4971 
4972 
4973 
4974 
4975 
4976 
4977 
4978 
4979 
4980 
4981 
4982 
4983 
4984 
4985 
4986 
4987 
4988 
4989 
4990 



037460 
037466 
037472 
037476 
037504 
037510 
037512 
037516 
037522 
037524 
037526 
037532 
037534 
037537 
037544 
037552 
037560 
037566 
037567 
037574 
037602 



037610 
037614 
037616 
037620 
037622 
037624 
037630 
037636 
037640 
037646 
037650 
037654 



01 3737 
005237 
104401 
113737 
01 3746 
104402 
104401 
013746 
104 -.05 
104407 
000137 
000000 
020040 
112 
043516 
04710b 
050055 
012 
124 
0201 17 
047123 



105737 
100002 
000000 
000430 
01 0046 
017600 
122737 
00101 1 
132737 
001405 
010037 
004737 



001234 
001210 
037537 
001 102 
037532 

037534 
001210 



034554 

000 
046525 
052040 
026504 
051501 

051505 
050040 
006517 



000002 
000001 



0376B0 
040100 



044520 
0201 17 
0431 17 
006523 

047124 
051501 
000013 



001246 
001247 



(IN OTHER WORDS, AFTER A CONTROL-Q WAS TYPED). 

A NEW SWITCH REG. VALUE WILU BE ASKED FOR. 

THE TEST NUMBER AND PASS NUMBER WILL BE TYPED, 

AND THEN THE PROGRAM WILL GO TO " END-OF-PASS* AND CONTINUE 



001210 
037533 



1$: 
2$: 
CMSG: 



.SBTTL 



MOV 


$PASS.$TMP5 


;GET THE VALUE OF "SPASS* 


INC 


$TMP5 


;FORM CURRENT PASS NO. 


TYPE 


,CMSG 


;TYPE THE TEST STOPS MESSAGE 


MOVB 


$TSTNM,1$ 


;SAVE THE TEST NUMBER 


MOV 


1$,-(SP) 


; J SAVE 1$ FOR TYPEOUT 


TYPOC 




;;G0 TYPE— OCTAL ASCIKALL DIGITS) 


TYPE 


.2$ 


;TYPE 2 SPACES 


MOV 


$TMP5,-(SP) 


;;SAVE $TMP5 FOR TYPEOUT 


TYPDS 




;;G0 TYPE— DECIMAL ASCII WITH SIGH 


GTSWR 




;ASK FOR NEW SWR VALUE 


JMP 


$E0P-l>2 


{CONTINUE AT SEOP+2 


.WORD 





; BUFFER FOR TEST NUMBER 


.ASCIZ 


/ / 


;TWO SPACES AND THE STOP MESSAGE 


.ASCII 


/JUMPING TO 


END-0F-PASS/<1 5X1 2> 



.ASCIZ 'TESTNO PASSN0/<1 5X1 2> 



.EVEN 

TYPE ROUTINE 



k***4i**«*«««**4i«i|i***i|t«****4t**«**i(ti|i4i4i*4iii<**4>4<4i4<*«4i*i|i**4i*4c4ri***4i*4> 

;*R0UTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A BYTE. 
{fTHE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED. 
;*N0TE1: SNULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER. 

;*N0TE2: $FILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 

;»N0TE3: SFILLC CONTAINS THE CHARACTER TO FILL AFTER. 



•,*CALL: 

;«1) USING A TRAP INSTRUCTION 
TYPE .MESADR 

;<kOR 

J* TYPE 
;« MESADR 



;;MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 



TSTB 


STPFLG 


;IS THERE A TERMINAL? 


BPL 


1$ 


;BR IF YES 


HALT 




JHALT HERE IF NO TERMINAL 


BR 


3$ 


; LEAVE 


MOV 


RO,-(SP) 


jSAVE RO 


MOV 


92(SP),R0 


;GET ADDRESS OF ASCIZ STRING 


CMPB 


#APTENV,$ENV 


; RUNNING IN APT MODE 


BNE 


62$ 


;NO,GO CHECK FOR APT CONSOLE 


BITB 


#APTSPOOL.$ENVM 


; SPOOL MESSAGE TO APT 


BEQ 


62$ 


5 NO, GO CHECK FOR CONSOLE 


MOV 


R0,61$ 


; SETUP MESSAGE ADDRESS FOR APT 


liSR 


PC,$ATY3 


; SPOOL MESSAGE TO APT 
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SEQ 0105 



4991 
4992 
4993 
4994 
4995 
4996 
4997 
4998 
4999 
5000 
5001 
5002 
5003 
5004 
5005 
5006 
5007 
5008 
5009 
5010 
501 1 
5012 
5013 
5014 
5015 
5016 
5017 
5018 
5019 
5020 
5021 
5022 
5023 
5024 
5025 
5026 
5027 
5028 
5029 
5030 
5031 
5032 
5033 
5034 
5035 
5036 
5037 
5038 
5039 
5040 
5041 
5042 
5043 
5044 
5045 
5046 



037660 
037662 
037670 
037672 
037574 
037676 
037700 
037702 
037706 
037710 
037714 
037716 
037722 
037724 
037726 
037730 
037732 
037736 
037740 
037744 
037750 
037752 

037756 
037762 
037764 
037770 
037774 



037776 
040002 
040006 
040014 
040016 
040020 
040022 
040026 
040030 
040036 
040044 
040046 
040052 
040054 
040062 
040064 
040066 
040070 



040072 
040100 
040106 



000000 




61$: 


.WORD 





; {MESSAGE ADDRESS 


132737 


000040 


001247 62$: 


BITB 


ll'APTCSUP,$ENVM 


;;APT CONSOLE SUPPRESSED 


001003 






BNE 


60$ 


; ;YES,SKIP TYPE OUT 


112046 




2$: 


MOVB 


vRO)+,-(SP) 


;;PUSH CHARACTER TO BE TYPED ONTO STACK 


001005 






BNE 


4$ 


;;BR IF IT ISN'T THE TERMINATOR 


005726 






TST 


(SP) + 


;;IF TER.v.INATOR POP IT OFF THE STACK 


01 2600 




60$: 


MOV 


(SP)-l-,RO 


; {RESTORE RO 


062716 


000002 


3$: 


ADD 


#2,(SP) 


; {ADJUST RETURN PC 


000002 






RTI 




{ {RETURN 


122716 


000011 


4$: 


CMPB 


#HT,(SP) 


{ {BRANCH IF <HT> 


001430 






BEO 


8$ 




122716 


000200 




CMPB 


#CRLF,(SP) 


{ {BRANCH IF NOT <CRLF> 


001006 






BNE 


5$ 




005726 






TST 


(SP) + 


{ {POP <CR><LF> EQUIV 


104401 






TYPE 




{ {TYPE A CR AND LF 


001223 






$CRLF 






105037 


040066 




CLRB 


SCHARCNT 


{{CLEAR CHARACTER COUNT 


000755 






BR 


2$ 


{ {GET NEXT CHARACTER 


004737 


040022 


5$: 


USR 


PC,$TYPEC 


{{GO TYPE THIS CHARACTER 


123726 


001156 


6$: 


CMPB 


$FILLC,(SP)-»- 


{{IS IT TIME FOR FILLER CHARS.? 


001350 






BNE 


2$ 


{{IF NO GO GET NEXT CHAR. 


01 3746 


001154 




MOV 


$NULL,-CSP) 


{{GET # OF FILLER CHARS. NEEDED 








{ {AND THE NULL CHAR. 


105366 


000001 


7$: 


DECB 


1(SP) 


{{DOES A NULL NEED TO BE TYPED? 


002770 






BLT 


6$ 


{{BR IF NO— GO POP THE NULL OFF OF STACK 


004737 


040022 




USR 


PC,$TYPEC 


{ {GO TYPE A NULL 


105337 


040066 




DECB 


$CHARCNT 


{{DO NOT COUNT AS A COUNT 


000770 






BR 


7$ 


{ { LOOP 









{HORIZONTAL TAB 


PROCESSOR 




112716 


000040 




8$: 


MOVB 


*' ,(SP) 


{REPLACE TAB WITH SPACE 


004737 


040022 




9$: 


JSR 


PC,$TYPEC 


{TYPE A SPACE 


132737 


000007 


040066 




BITB 


#7,$CHARCNT 


{BRANCH IF NOT AT 


001372 








BNE 


9$ 


{TAB STOP 


005726 








TST 


(SP) + 


{POP SPACE OFF STACK 


000724 








BR 


2$ 


{GET NEXT CHARACTER 


105777 


141122 




STYPEC: 


TSTB 


PSTPS 


{WAIT UNTIL PRINTER IS READY 


100375 








BPL 


STYPEC 




1 16677 


000002 


141114 




MOVB 


2(SP),#$TPB 


{LOAD CHAR TO 3C TYPED INTO DATA 


122766 


000015 


000002 




CMPB 


#CR,2(SP) 


{IS CHARACTER A CARRIAGE RETURN? 


001003 








BNE 


1$ 


{BRANCH IF NO 


105037 


040066 






CLRB 


$CHARCNT 


{YES— CLEAR CHARACTER COUNT 


000406 








BR 


$TYPEX 


{EXIT 


122766 


000013 


000003 


1$: 


CMPB 


#LF,2(SP) 


{IS CHARACTER A LINE FEED? 


001402 








BEQ 


STYPEX 


{BRANCH IF YES 


105227 








INCB 


(PC) + 


{COUNT THE CHARACTER 


000000 






SCHARCNT: .WORD 





{CHARACTER COUNT STORAGE 


000207 






$TYPEX: 


RTS 


PC 





112737 000001 
112737 000001 
000403 



040336 
040334 



.SBTTL APT COMMUNICATIONS ROUTINE 

$ATYi: MOVB «'1,$FFLG {{TO REPORT FATAL ERROR 

$ATY3: MOVB #1 ,$MFLG { {TO TYPE A MESSAGE 

BR $ATYC 



t 
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5047 


0401 10 


1 1 2737 


000001 


040338 


$ATY4: 


MOVB 


#1 ,$FFLG 


;;T0 ONLY REPORT FATAL ERROR 


5048 


0401 16 








$ATYC! 








5049 


0401 16 


01 0046 








MOV 


RO,-(SP) 


; ; PUSH RO ON STACK 


5050 


0401 20 


01 0146 








MOV 


R1 ,-(SP) 


; ; PUSH R1 ON STACK 


5051 


0401 22 


105737 


040334 






TSTB 


$MFLG 


SHOULD TYPE A MESSAGE? 


5052 


0401 26 


001450 








BEQ 


5$ 


; ; IF NOT: BR 


5053 


0401 30 


122737 


000001 


001246 




CMPB 


#APTENV,$ENV 


;;OPERATING UNDER APT? 


5054 


0401 36 


001031 








BNE 


3$ 


; ; I F NOT : BR 


5055 


0401 40 


132737 


000100 


001247 




BITB 


#APTSPOOL,$ENVM 


;; SHOULD SPOOL MESSAGES? 


5056 


0401 46 


001425 








BEQ 


3$ 


; ; IF NOT: BR 


5057 


0401 50 


01 7500 


000004 






MOV 


@4(SP) ,R0 


; ;GET MESSAGE ADDR. 


5058 


0401 54 


062766 


000002 


OOOOO-' 




ADO 


/y2,4(SP) 


;;BUMP RETURN ADDR. 


5059 


040162 


005737 


001226 




1$: 


TST 


$MSGTYPE 


;;SEE IF DONE W/ LAST XMISSION? 


5060 


040166 


001375 








BNE 


1$ 


; ; IF NOT : WAIT 


50G1 


0401 70 


01 0037 


001242 






MOV 


RO,$MSGAD 


;|PUT ADDR IN MAILBOX 


5082 


0401 74 


105720 






2$: 


TSTB 


(R0)4- 


IJFIND END OF MESSAGE 


50Q3 


0401 76 


001376 








BNE 


2$ 




50$A 


040200 


163700 


001242 






SUB 


SMSGAD.RO 


;;SUB iTART OF MESSAGE 


5005 


040204 


006200 








ASR 


RO 


;;GET MESSAGE LNGTH IN WORDS 


5026 


040206 


01 0037 


001244 






MOV 


RO.SMSGLGT 


;;PUT LENGTH IN MAILBOX 


5067 


040212 


01 2737 


000004 


001226 




MOV 


#4,$MSGTYPE 


;;TELL APT TO TAKE MSG. 


5008 


040220 


000413 








BR 


5$ 




5069 


040222 


01 7637 


000004 


040246 


3$: 


MOV 


94(SP) ,4$ 


;;PUT MSG ADDR IN USR LINKAGE 


5070 


046230 


062766 


000002 


000004 




ADD 


#2.4(SP) 


;;BUMP RETURN ADDRESS 


5071 


040236 


01 3746 


177776 






MOV 


177776, -(SP) 


;;PUSH 177776 ON STACK 


5072 


040242 


004737 


037610 






JSR 


PC,$TYPE 


; ;CALL TYPE MACRO 


5073 


040246 


000000 






4$: 


.WORD 







5074 


040250 








5$: 








5075 


040250 


105737 


040336 




10$: 


TSTB 


$FFLG 


;; SHOULD REPORT FATAL ERROR? 


5076 


040254 


001416 








BEQ 


12$ 


; ; I F NOT : BR 


5077 


040256 


005737 


001246 






TST 


SENV 


;; RUNNING UNDER APT? 


5078 


040262 


00141 3 








BEQ 


12$ 


; ; IF NOT: BR 


5079 


040264 


005737 


001226 




11$: 


TST 


$MSGTYPE 


;; FINISHED LAST MESSAGE? 


5080 


040270 


001^75 








BNE 


11$ 


; ; IF NOT: WAIT 


5081 


040272 


01 7637 


000004 


001230 




MOV 


94(SP) ,$FATAL 


; iGET ERROR # 


5082 


040300 


062766 


000002 


000004 




ADD 


#2,4(SP) 


; ;BUMP RETURN ADDR. 


5083 


040306 


005237 


001226 






INC 


$MSGTYPE 


;;TELL APT TO TAKE ERROR 


5084 


040312 


105037 


040336 




12$: 


CLRB 


$FFLG 


;CLEAR FATAL FLAG 


5085 


040316 


105037 


040335 






CLRB 


$LFLG 


;CLEAR LOG FLAG 


5086 


040322 


105037 


040334 






CLRB 


$MFLG 


; CLEAR MESSAGE FLAG 


5087 


040326 


01 2601 








MOV 


(SP)+,R1 


;POP STACK INTO R1 


5088 


040330 


01 2600 








MOV 


(SP}-f,R0 


;POP STACK INTO RO 


5089 


040332 


000207 








RTS 


PC 


.•RETURN 


5090 


040334 


000 






$MFLG: 


.BYTE 




;MESSG. FLAG 


5091 


040335 


000 






$LFLG: 


.BYTE 





;LOG FLAG 


5092 


040336 


000 






$FFLG: 


.BYTE 





; FATAL -LAG 


5093 




040340 








.EVEN 






5094 




000200 






APTSIZE«200 






5095 




000001 






APTENVs 


001 






5096 




000100 






AP. iPOOL=100 






5097 




000040 






APTCSUP 


«040 






5098 










.SBTTL 


BINARY 


TO ASCII AND TYPE 


ROUTINE 


5099 


















5100 












5101 










{•THIS 


ROUTINE 


IS USED TO CHANGE 


A 16-BIT BINARY NUMBER TO A 16-BXT 


5102 










;*BINARY-ASCn 


NUMBER AND TYPE IT. 
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IFKTHB 


P1 1 


27-JUN-7a 


09:27 




BINARY 


TO ASCII 


AND TYPE ROUTINE 




5103 










;*CALL: 








5104 










J • 


MOV 


NUMBER, -(SP) 


; ; NUMBER TO BE TYPED 


5105 










• * 


TYPBN 




{ {TYPE IT 


5106 


















5107 


040340 


01 0146 






$TYPBN: 


MOV 


R1 ,-(SP) 


{ {SAVE R1 ON THE STACK 


5108 


040342 


016601 


000006 






MOV 


6(SP) ,R1 


{{GET THE INPUT NUMBER 


5109 


040346 


000261 








SEC 




{{SET "C" SO CAN KEEP TRACK OF THE NUMBER OF BITS 


5110 


040350 


112737 


000060 


040412 


1$: 


MOVB 


ly'O.SBIN 


{{SET CHARACTER TO AN ASCII "0". 


5111 


040356 


006101 








ROL 


R1 


{ {GET THIS BIT 


5112 


040360 


001406 








BEQ 


2$ 


{ {DONE? 


5113 


040362 


105537 


040412 






ADCB 


$BIN 


{{NO— SET THE CHARACTER EQUAL TO THIS BIT 


5114 


040366 


104401 


040412 






TYPE 


,$BIN 


{ {GO TYPE THIS BIT 


5115 


040372 


000241 








CLC 




{{CLEAR "C" SO CAN KEEP TRACK OF BITS 


51 16 


040374 


000-55 








BR 


1$ 


{ {GO DO THE NEXT BIT 


5117 


040376 


01 2601 






2$: 


MOV 


(SP)+,R1 


{ {POP THE STACK INTO R1 


5118 


040400 


016666 


000002 


000004 




MOV 


2(SP),4(SP) 


{ {ADUUST THE STACK 


51 19 


040406 


012616 








MOV 


(SP)+,(SP) 




5120 


040410 


000002 








RTI 




{ {RETURN TO USER 


5121 


040412 


000 


000 




$BIN: 


.BYTE 


0,0 


; {STORAGE FOR ASCII CHAR. AND TERMINATOR 


5122 
5123 










.SBTTL 


BINARY 


TO OCTAL (ASCII) 


AND TYPE 


5124 










;;♦*♦*♦**♦♦***♦**«*♦***♦♦•♦♦•**♦ 




5125 










;*THIS 


ROUTINE 


IS USED TO CHANGE 


A 16-BIT BINARY NUMBER TO A 6-DIGIT 


5126 










{•OCTAL 


(ASCII) 


NUMBER AND TYPE 


IT. 


5127 










5*$TYP0S— -ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 


5128 










{•CALL! 








5129 










5 * 


MOV 


NUM,-(SP) 


{ {NUMBER TO BE TYPED 


5130 










; * 


TYPOS 




{ {CALL FOR TYPEOUT 


5131 










; ♦ 


.BYTE 


N 


{{N»1 TO 6 FOR NUMBER OF DIGITS TO TYPE 


5132 










• « 


.BYTE 


M 


{ {Mai OR 


5133 










• * 






{{1=TYPE LEADING ZEROS 


5134 










• * 






{{O-SUPPRESS LEADING ZEROS 


5135 










• * 








5136 










;*$TYPON ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE UST 


5137 










;*$TYPOS OR $TYPOC 




5138 










{•CALL: 








5139 










• * 


MOV 


NUM,-(SP) 


{ {NUMBER TO BE TYPED 


5140 










{ * 


TYPON 




{ {CALL FOR TYPEOUT 


5141 










{ * 








5142 










{•$TYPOC ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 


5143 










{•call: 








5144 










• * 


MOV 


NUM,-(SP) 


{{NUMBER TO BE TYPED 


5145 










{ * 


TYPOC 




{{CALL FOR TYPEOUT 


5146 


















5147 


040414 


017646 


000000 




$ TYPOS: 


MOV 


l»(SP),-(SP) 


{ {PICKUP THE MODE 


5148 


040420 


116637 


000001 


040637 




MOVB 


1(SP) ,$OFILL 


{ ; LOAD ZERO FILL SWITCH 


5149 


040426 


112637 


040641 






MOVB 


(SP)+,$0M0DE+1 


{{NUMBER OF DIGITS TO TYPE 


5150 


040432 


062716 


000002 






ADD 


#2,(SP) 


{{ADJUST RETURN ADDRESS 


5151 


040436 


000406 








BR 


STYPON 




5152 


040440 


1 1 2737 


000001 


040637 


$TYPOC: 


MOVB 


#1 ,$OFILL 


{{SET THE ZERO FILL SWITCH 


5153 


040446 


1 1 2737 


000006 


040641 




MOVB 


#6,$0M0DE-I>1 


{ {SET FOR SIX(6) DIGITS 


5154 


040454 


112737 


000005 


04063P 


$TYPON: 


MOVB 


#5,$0CNT 


{{SET THE ITERATION COUNT 


5155 


040462 


010346 








MOV 


R3,-(SP) 


{ {SAVE R3 


5156 


040464 


01 0446 








MOV 


R4,-(SP) 


{ {SAVE R4 


5157 


040466 


010546 








MOV 


R5.-(SP) 


{ {SAVE R5 


5158 


040470 


113704 


040641 






MOVB 


SOMODE-t-l ,R4 


{{GET THE NUMBER OF DIGITS TO TYPE 
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SEO 0108 



5159 


040474 


005404 






NEG 


R4 


5160 


040476 


062704 


000006 




ADD 


#6,R4 


5161 


040502 


110437 


040640 




MOVB 


R4,$0M0DE 


5162 


040506 


1 1 3704 


040637 




MOVB 


3.0FILL,R4 


5163 


040512 


016S05 


000012 




MOV 


12(SP},R9 


5164 


040516 


005003 






CLR 


R3 


5165 


040520 


006105 




IS! 


ROL 


R5 


5166 


040522 


000404 






BR 


3$ 


5167 


040524 


006105 




3$: 


ROL 


R5 


5168 


040526 


006105 






ROL 


R5 


5169 


040530 


006105 






ROL 


R5 


5170 


040532 


01 0503 






MOV 


R5,R3 


5171 


040534 


006103 




3$: 


ROL 


R3 


5172 


040536 


105337 


040640 




DECS 


$0M0DE 


5173 


040542 


100016 






BPL 


7$ 


5174 


040544 


042703 


177770 




BIC 


#177770, R3 


5175 


040550 


001002 






BNE 


4S 


5176 


040552 


005704 






TST 


R4 


5177 


040554 


001403 






BEQ 


11$ 


5178 


040556 


005204 




4$: 


INC 


R4 


5179 


040560 


052703 


000060 




BIS 


#'0,R3 


5180 


040554 


052703 


000040 


5$: 


BIS 


#' ,R3 


5181 


040570 


1 10337 


040634 




MOVB 


R3,8$ 


5182 


040574 


104401 


040634 




TYPE 


,8$ 


5183 


040600 


105337 


040636 


7$! 


DECB 


$OCNT 


5184 


040604 


003347 






BGT 


2$ 


5185 


040606 


002402 






BLT 


6$ 


5186 


040610 


005204 






INC 


R4 


5187 


040612 


000744 






BR 


2$ 


5188 


040614 


01 2605 




6$: 


MOV 


(SP)+,R5 


5189 


040616 


012604 






MOV 


(SP)+,R4 


5190 


040620 


012603 






MOV 


(SP)4-,R3 


5191 


040622 


016666 


000003 000004 




MOV 


2(SP),4(SP) 


5192 


040630 


012616 






MOV 


(SP)4-,(SP) 


5193 


040632 


000002 






RTI 




5194 


040634 


000 




8$: 


.BYTE 





5195 


040635 


000 






.BYTE 





5196 


040636 


000 




SOCNT: 


.BYTE 





5197 


040637 


000 




SOFILL: 


.BYTE 





5198 


040640 


000000 




SOMODE: 


.WORD 






5199 
5200 
5201 
5202 
5203 
5204 
5205 
5206 
5207 
5208 
5209 
5210 
5211 
5212 
5213 
5214 



.SBTTL CONVERT BINARY TO DECIMAL 



I SUBTRACT IT FOR MAX. ALLO 
ISAVE IT FOR USE 
IGET THE ZERO FILL SWITCH 
[PICKUP THE INPUT NUMBER 
I CLEAR -.HE OUTPUT WORD 
IROTATE MSB INTO "C" 
;G0 DO MSB 
[FORM THIS DIGIT 



;GET LSB OF THIS DIGIT 
;TYPE THIS DIGIT? 
;BR IF NO 
IGET RID OF UUNK 
ITEST FOR 
[SUPPRESS THIS 0? 
JBR IF YES 

; DON'T SUPPRESS ANYMORE O'S 

IMAHE THIS DIGIT ASCII 

IMAKE ASCII IF NOT ALREADY 

;SAVE FOR TYPING 

IGO TYPE THIS DIGIT 

; COUNT BY 1 

I BR IF MORE TO DO 

I BR IF DONE 

; INSURE LAST DIGIT ISN'T A BLANK 
;G0 DO THE LAST DIGIT 
[RESTORE R5 
[RESTORE R4 
[RESTORE R3 

[SET THE STACK FOR RETURNING 
[RETURN 

[STORAGE FOR ASCII DIGIT 
[TERMINATOR FOR TYPE ROUTINE 
[OCTAL DIGIT COUNTER 
[ZERO FILL SWITCH 
[NUMBER OF DIGITS TO TYPE 
AND TYPE ROUTINE 



• .«*«i|i««**4i4.*****i»***«*«**«iti«««***«»4<4i4c*i*4c4i«4[«*4i*4i4i**4r**4>*4>4>4>4^*4'* 

;*THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 5-DIGIT 
;*S1GNED DECIMAL (ASCII) NUMBER AND TYPE IT. DEPENDING ON WHETHER THE 
;*NUMBER IS POSITIVE OR NEGATIVE A SPACE OR A MINUS SIGN WILL BE TYPED 
;«BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYS BE 
j*REPLACED WITH SPACES. 
{*CALL: 



MOV 
TYPDS 



040642 

040642 010046 

040644 010146 

040646 010246 



STYPDS! 



MOV 
MOV 
MOV 



NUM,-(SP) 



RO,-(SP) 
R1 ,-(SP) 
R3,-(SP) 



;;PUT THE BINARY NUMBER ON THE STACK 
;;G0 TO THE ROUTINE 



J ; PUSH RO ON STACK 
; ;PUSH R1 ON STACK 
J I PUSH R2 ON STACK 
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SEO 0109 



5215 


040650 


010346 




5216 


040652 


01 0546 




5217 


040654 


012746 


020200 


5218 


040660 


016605 


000020 


5219 


040664 


100004 




5220 


040666 


005405 




5221 


040670 


1 1 2766 


000055 


5222 


040676 


005000 




5223 


040700 


01 2703 


041056 


5224 


040704 


112723 


000040 


5225 


040710 


005002 




5226 


040712 


016001 


041046 


5227 


040716 


160105 




5228 


040720 


002402 




5229 


040722 


005202 




5230 


040724 


000774 




5231 


040726 


060105 




5232 


040730 


005702 




5233 


040732 


001002 




5234 


040734 


105716 




5235 


040736 


100407 




5236 


040740 


106316 




5237 


040742 


103003 




5238 


040744 


1 1 6663 


000001 


5239 


040752 


052702 


000060 


5240 


040756 


052702 


000040 


5241 


040762 


110223 




5242 


040764 


005720 




5243 


040766 


020027 


000010 


5244 


040772 


002746 




5245 


040774 


003002 




5246 


040776 


01 0502 




5247 


041000 


000764 




5248 


041002 


105.26 




5249 


041004 


100003 




5250 


041006 


116663 


177777 


5251 


041014 


105013 




5252 


041016 


012605 




5253 


041020 


01 2603 




5254 


041022 


01 2602 




5255 


041024 


012601 




5256 


041026 


01 2600 




5257 


041030 


104401 


041056 


5258 


041034 


016666 


000003 


5259 


041042 


012616 




5260 


041044 


000002 




5261 


041046 


023420 




5262 


041050 


001750 




5263 


041052 


000144 




5264 


041054 


000012 




5265 


041056 


000004 




5266 








5267 








5268 








5269 








5270 









2$: 
3$: 



6$: 
7$: 



8$: 
9$: 



SDBLK: 
.SBTTL 



MOV 


R3,-(SP) 


JPUSH R3 ON STACK 






MOV 


R5,-(SP) 


JPUSH R5 ON STACK 






MOV 


#20200, -CSP) 


;SET BLANK SWITCH AND SIGN 




MOV 


20(SP),RS 


;GET THE INPUT NUMBER 






BPL 


1$ 


;BR IF INPUT IS POS. 






NEG 


R5 


JMAKE THE BINARY NUMBER 


POS. 




MOVB 


#'-,1(SP) 


;MAKE THE ASCII NUMBER 


NEG. 




CLR 


RO 


;ZERO THE CONSTANTS INDEX 




MOV 


#$DBLK,R3 
#• ,(R3)'»- 


; SETUP THE OUTPUT POINTER 




MOVB 


;SET THE FIRST CHARACTER TO A BLANK 


CLR 


R2 


; CLEAR THE BCD NUMBER 






MOV 


$DTBL(R0},R1 


-.GET THE CONSTANT 






SUB 


R1 ,R5 


JFORM THIS BCD DIGIT 






BLT 


4$ 


;BR IF DONE 






INC 


R2 


INCREASE THE BCD DIGIT 


BY 1 




BR 


3$ 








ADD 


R1 ,R5 


iADD BACK THE CONSTANT 






TST 


R2 


; CHECK IF BCD DIGIT»0 






BNE 


5$ 


;FALL THROUGH IF 






TSTB 


(SP) 


;STILL DOING LEADING 0' 


S? 




BMI 


7$ 


;BR IF YES 






ASLB 


(SP) 


;MSD? 






BCC 


6$ 


;BR IF NO 






MOVB 


1 (SP) ,-1(R3) 


; YES— SET THE SIGN 






BIS 


#'0,R2 


;MAKE THE BCD DIGIT ASCII 




BIS 


#• ,R2 


;MAKE IT A SPACE IF NOT 


ALREADY A 


DIGIT 


MOVB 


R2,(R3)-l- 


;PUT THIS CHARACTER IN 


THE OUTPUT 


BUFFER 


TST 


(R0) + 


;JUST INCREMENTING 






CMP 


R0,#10 


; CHECK THE TABLE INDEX 






BLT 


2$ 


;G0 DO THE NEXT DIGIT 






BGT 


8$ 


;G0 TO EXIT 






MOV 


R5,R2 
6$ 


;GET THE LSD 






BR 


, ;G0 CHANGE TO ASCII 






TSTB 


(SP)-I- 


;WAS THE LSD THE FIRST 


NON-ZERO? 




BPL 


9$ 


;BR IF NO 






MOVB 


-1(SP).-2(R3) 


, ;YES— SET THE SIGN FOR 


TYPING 




CLRB 


(R3) 


; ;SET THE TERMINATOR 






MOV 


(SP)+,R5 


, ;POP STACK INTO R5 






MOV 


(SP)4-,R3 


;POP STACK INTO R3 






MOV 


(SP)4-,R2 


;POP STACK INTO R2 






MOV 


(SP)+,R1 


; ;POP STACK INTO R1 






MOV 


(SP)-i-,RO 


; ;POP STACK INTO RO 






TYPE 


,$DBLK 


; ;NOW TYPE THE NUMBER 






MOV 


2(SP),4(SP) 


; J ADJUST THE STACK 






MOV 


(SP)+,(SP) 








RTI 


; {RETURN TO USER 






10000. 










1000. 










100. 










10. 










.BLKW 


4 









SAVE AND RESTORE RO-RS ROUTINES 



;*SAVE R0-R8 
;«CALL: 



mm***************** 
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SEO 0110 



5271 
5272 
5273 
5274 
5275 
5276 
5277 
5278 
5279 
5280 
5281 
5282 
5283 
5284 
5285 
5286 
5287 
5288 
5289 
5290 
5291 
5292 
5293 
5294 
5295 
5296 
5297 
5298 
5299 
5300 
5301 
5302 
5303 
5304 
5305 
5306 
5307 
5308 
5309 
5310 
5311 
5312 
5313 
5314 
5315 
5316 
5317 
5318 
5319 
5320 
5321 
5322 
5323 
5324 
5325 
5326 



041066 

041066 010-46 



041070 
041072 
041074 



010146 
010246 
010346 



041076 010446 

041100 010546 

041102 016646 000022 

041106 016646 000022 

041112 016646 000022 

041116 016646 000022 

041122 000002 



041124 

041124 012656 000022 

041130 012666 000022 

041134 012666 000022 

041140 012666 000022 

041144 012605 

041146 012604 

041150 012603 

041152 012602 

041154 012601 

041156 012600 

041160 000002 



041162 104413 

041164 016601 000002 

041170 012705 041301 

041174 012704 000014 

041200 012703 177770 



« SAVREG 

♦UPON RETURN FROM $SAVREQ THE STACK WILL LOOK LIKE: 

* 

*TOP (-HB) 

* +2 ( + 18) 

* +4 R5 

* •♦•6 R4 

* +8 R3 

* + 10 R2 

*-»'12 R1 

»+14 RO 

SSAVREG: 



MOV 


RO,-(SP) 




;PUSH 


RO 


ON 


STACK 


MOV 


R1 ,-(SP) 




;PUSH 


R1 


ON 


STACK 


MOV 


R2,-(SP) 




;PUSH 


R2 


ON 


STACK 


MOV 


R3,-(SP) 




;PUSH 




ON 


STACK 


MOV 


R4,-(SP) 




; PUSH^ 


^4 


ON 


STACK 


MOV 


R5,-(SP) 




;PUSH 


R5 


ON 


STACK 


MOV 


22(SP) 


(SP) 


;SAVE 


PS 


OF 


MAIN FLOW 


MOV 


22(SP),- 


(SP) 


;SAV£ 


PC 


OF 


MAIN FLOW 


MOV 


22(SP).- 


(SP) 


;SAVE 


PS 


OF 


CALL 


MOV 


22(SP),- 


(SP) 


;SAVE 


PC 


OF 


CALL 


RTI 















♦RESTORE R0-R5 

♦call: 



RESREQ 










MOV 


(SP) + 


22(SP) 


; RESTORE PC OF CALL 




MOV 


(SP)+,22(SP) 


;RESTORE PS OF CALL 




MOV 


(SP) + 


22(SP) 


{RESTORE PC OF MAIN 


FLOW 


MOV 


(SP) + 


22{SP) 


{RESTORE PS OF MAIN 


FLOW 


MOV 


(SP) + 


R5 


;POP STACK INTO R5 




MOV 


(SP) + 


R4 


;POP STACK INTO R4 




MOV 


(SP) + 


R3 


JPOP STACK INTO R3 




MOV 


(SP) + 


R2 


;POP STACK INTO R2 




MOV 


(SP)4- 


R1 


;POP STACK INTO R1 




MOV 


<SP) + 


RO 


;POP STACK INTO RO 




RTI 










DOUBLE 


LENGTH 


BINARY TO OCTAL ASCII CONVERT ROUTINE 



;*THIS ROUTINE WILL CONVERT A 32-BIT UNSIGNED BINARY NUMBER TO AN 
{♦UNSIGNED OCTAL ASCIZ NUMBER. 
{♦CALL 



MOV 
JSR 

RETURN 



SAVREG 

MOV 

MOV 

MOV 

MOV 



#PNTR,-(SP) 
PC,»#$DB20 



2{SP),R1 
#$0CTVL-l-13.,RS 
#12. ,R4 
#"C7,R3 



{{POINTER TO LOW WORD OF BINARY NUMBER 
{ {CALL THE ROUTINE 

{{THE ADDRESS OF THE FIRST ASCIZ CHAR. IS ON THE STACK 



{ {SAVE ALL REGISTERS 

{{PICKUP THE POINTER TO LOW WORD 

{{POINTER TO DATA TABLE 

{{DO ELEVEN CHARACTERS 

; {MASK 
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5327 


041204 


01 2100 




MOV 


(R1 )+,R0 


{LOWER WORD 


5328 


041206 


01 2101 




MOV 


(R1)+,R1 


{HIGH WORD 


5329 


041210 


005002 




CLR 


R2 


{TERMINATOR 


5330 


041212 


110245 


1$: 


MOVB 


M2,-(R5) 


{PUT CHARACTER IN DATA TABLE 


5331 


041214 


01 0002 




MOV 


R0,R2 


{GET THIS DIGIT 


5332 


041216 


005304 




DEC 


R4 


{COUNT THIS CHARACTER 


5333 


041220 


003007 




BGT 


3$ 


{BR IF NOT THE LAST DIGIT 


5334 


041222 


001405 




BEQ 


2$ 


{BR IF IT IS THE LAST DIGIT 


5335 


041224 


005205 




INC 


R5 


{ALL DIGITS DONE-ADUUST POINTER FOR FIRST 


5336 


041226 


010566 000002 




MOV 


R5,2(SP) 


{ASCIZ CHAR. & PUT IT ON THE STACK 


5337 


041232 


104414 




RESREG 




{RESTORE ALL REGISTERS 


5338 


041234 


000207 




RTS 


PC 


{RETURN TO USER 


5339 


041236 


006203 


2$: 


ASR 


R3 


{POSITION THE MASK FOR THE LAST DIGIT 


5340 


041240 


006001 


3$: 


ROR 


R1 


{POSITION THE BINARY NUMBER FOR 


5341 


041242 


006000 




ROR 


RO 


{ THE NEXT OCTAL DIGIT 


5342 


041244 


006001 




ROR 


R1 




5343 


041246 


006000 




ROR 


RO 




5344 


041250 


006001 




ROR 


R1 




5345 


041252 


006000 




ROR 


RO 




5346 


041254 


040302 




BIC 


R3,R2 


{MASK OUT ALL JUNK 


5347 


041256 


062702 000060 




ADD 


#'0,R2 


{Make this char, ascii 


534B 


041262 


000753 




BR 


1$ 


{GO PUT IT IN THE DATA TABLE 


5349 


041264 


000016 


$OCTVLi 


.BLKB 


14. 


{RESERVE DATA TABLE 
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5350 










.SBTTL TRAP DECODER 




5351 
















5352 












****i,***00t***************** ****** **************** 


5353 










;*THIS ROUTINE 


WILL PICKUP THE 


LOWER BYTE OF THE "TRAP" INSTRUCTION 


5354 










;*AND USE IT TO 


INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 


5355 










;*0F THE DESIRED ROUTINE. THEN 


USING THE ADDRESS OBTAINED IT WILL 


5356 










;*G0 TO THAT ROUTINE. 




5357 
















5358 


041 302 


01 0046 






strap: MOV 


RO,-(SP) 


I {SAVE RO 


5359 


041 304 


01 6600 


000002 




MOV 


2(SP) ,R0 


; ;GET TRAP ADDRESS 


5360 


041 31 


005740 






TST 


-(RO) 


;; BACKUP BY 2 


5361 


041312 


1 1 1 000 






MOVB 


(RO),RO 


i;GET RIGHT BYTE OF TRAP 


5362 


041 314 


006300 






ASL 


RO 


JJPOSITION FOR INDEXING 


5363 


041316 


01 6000 


041336 




MOV 


$TRPAD(RO),RO 


;; INDEX TO TABLE 


5364 


041322 


000200 






rts 


RO 


;;G0 TO ROUTINE 


5365 
















5366 
















5367 










nTHlS IS USE WO HANDLE THE "GETPRI* MACRO 


5368 
















5369 


041 324 


Oil 646 






$TRAP2: MOV 


(SP),-(SP) 


; jMOVE THE PC DnWN 


5370 


041326 


01 6666 


000004 


______ 

000002 


MOV 


4(SP),2(SP) 


;;MOVE THE PSW DOWN 


5371 


041334 


000002 






RTI 




RESTORE THE PSW 


5372 
















5373 










.SBTTL TRAP TABLE 




5374 
















5375 










loTHIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 


5376 










;*BY THE "TRAP" 


INSTRUCTION. 




5377 
















5378 










; ROUTINE 






5379 
















5380 


041 336 


04 1 324 






STRPAD: .WORD 


$TRAP2 




5381 


041 340 


03761 






STYPE 


; ;CALL»TYPE 


TRAP+1 ( 104401 ) TTY TYPEOUT ROUTINE 


5382 


041 342 


040440 






STYPOC 


J ;CALL»TYPOC 


TRAP-i^2( 104402) TYPE OCTAL NUMBER (WITH LEADING ZEROS) 


5383 


041 344 


040h 1 4 






STYPOS 


; ;CALL«TYPOS 


TRAP-«-3( 104403) TYPE OCTAL NUMBER (NO LEADING ZEROS) 


5384 


041 3 4C 


040454 






STYPON 


; ;CALL=TYPON 


TRAP-i-4( 104404) TYPE OCTAL NUMBER (AS PER LAST CALL) 


5385 


041 350 


040642 






STYPDS 


; ;CALL«TYPDS 


TRAP+5( 104405) TYPE DECIMAL NUMBER (WITH SIGN) 


5386 


041352 


040340 






$TYPBN 


; ;CALL«TYPBN 


TRAP-(-6( 104406) TYPE BINARY (ASCII) NUMBER 


5387 
















5388 


041 354 


036536 






$GTSWR 


; ;CALL>GTSWR 


TRAP+7( 104407) GET SOFT-SWR SETTING 


5389 
















5390 


041 356 


036466 






SCKSWR 


; JCALL=CKSWR 


TRAP+1 0( 104410) TEST FOR CHANGE IN SOFT-SWR 


5391 


041 360 


03701 






SRDCHR 


; ;CALL=RDCHR 


TRAP+1 1(104411) TTY TYPEIN CHARACTER ROUTINE 


5392 


041 362 


0371 30 






SRDLIN 


; jCALLaRDLiN 


TRAP+12( 104412) TTY TYPEIN STRING RtHJTINE 


5393 


041 364 


041066 






SSAVREG 


, ;CALL=SAVREG 


TRAP+13( 104413) SAVE R0-R5 ROUTINE 


5394 


041 366 


04 1 1 24 






SRESREG 


; iCALL^'RESREG 


TRAP+1 4(104414) RESTORE R0-R5 ROUTINE 


5395 










.SBTTL POWER DOWN AND UP ROUTINES 


5396 
















5397 










• •0i^'*ftilii^**r^rlfmni*i^i***#*#*m*iltil/m*'«inf*** *********** 


5398 










; POWER DOWN ROUTINE 




5399 


041370 


012737 


041546 


000024 


$PWftDN: MOV 


#$ILLUP,©#PWRVEC ;;SET FOR FAST UP 


5400 


041376 


01 2737 


000340 


000026 


MOV 


«340,@#PWRVEC4-2 


; ;PRI0:7 


5401 


041404 


010046 






MOV 


R0,-(SP) 


; ; PUSH RO ON STACK 


5402 


041406 


010146 






MOV 


R1 ,-(SP) 


} ;PUSH R1 ON STACK 


5403 


041410 


010246 






MOV 


R2,-(SP) 


; ;PUSH R2 ON STACK 


5404 


041412 


010346 






MOV 


R3,-(SP) 


JJPUSH R3 ON STACK 


5405 


041414 


010446 






MOV 


R4,-<SP) 


;;PUSH R4 ON STACK 
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SEO 0113 



5406 


041416 


010545 








MOV 


R5,-(SP) 


• jPUSH R5 ON STACK 


5407 


041420 


01 7746 


137514 






MOV 


9SWR,-(SP) 


; ; PUSH @5WR ON STACK 


5408 


041424 


010637 


041552 






MOV 


SP,$SAVR6 


; JSAVE SP 


5409 


041430 


012737 


041442 


000024 




MOV 


/ySPWRUP.it^PWRVEC 


;;SET UP VECTOR 


5410 


041436 


000000 








HALT 






541 1 


041440 


000776 








BR 


.-2 


•;HANG UP 


5412 


















5413 










• ****** 


*************'/^*llt:*lt,*****************************0***i***m*tlif0 


5414 










{POWER 


UP ROUTINE 




5415 


041442 


012737 


041546 


000024 


SPWRUP: 


MOV 


#$ILLUP,9#PWRVEC 


j;SET FOR FAST DOWN 


5416 


041450 


013706 


041552 






MOV 


$SAVR6,SP 


;GET SP 


5417 


041454 


005037 


041552 






CLR 


$SAVR6 


;WAIT LOOP FOR THE TTY 


5418 


041460 


005237 


041552 




1$! 


INC 


$SAVR6 


{WAIT FOR THE INC 


5419 


041464 


001 j75 








BNE 


1$ 


;0F WORD 


5420 


041466 


012677 


137446 






MOV 


(SP)+,PSWR 


;POP STACK INTO @SWR 


5421 


041472 


01 2605 








MOV 


(SP)+,R5 


IPOP STACK INTO R5 


5422 


041474 


01 2604 








MOV 


(SP)+,R4 


;POP STACK INTO R4 


5423 


041476 


012603 








MOV 


(SP)+,R3 


;POP STACK INTO R3 


5424 


041500 


012602 








MOV 


(SP)+,R2 


;POP STACK INTO R2 


5425 


04150? 


012601 








MOV 


(SP)+,R1 


;POP STACK INTO R1 


5426 


041504 


012600 








MOV 


(SP)+.RO 


;POP STACK INTO RO 


5427 


041506 


012737 


041370 


000024 




MOV 


iy$PWRDN,9#PWRVEC 


; ; SET UP THE POWER DOWN VECTOR 


5428 


041514 


012737 


000340 


000026 




MOV 


#340,9«'PWRVEC+2 


;PR10:7 


5 429 


041522 


104401 








TYPE 




{REPORT THE POWER FAILURE 


5430 


041524 


041554 






SPWRMG: 


.WORD 


PWRMSG 


{POWER FAIL MESSAGE POINTER 


5431 


041526 


01 2716 








MOV 


(PC)+,(SP) 


{RESTAP' AT START 


5432 


041530 


020000 






SPWRAD: 


.WORD 


START 


{RESTART ADDRESS 


5433 


041532 


042766 


000020 


000002 




BIC 


#20.2(SP) 


{CLEAR "T" BIT 


5434 


041540 


005037 


035032 






CLR 


STBIT 


{CLEAR THE *T* BIT FLAG 


5435 


041544 


000002 








RTI 






5436 


C41546 


000000 






SILLUP: 


HALT 




{THE POWER UP SEQUENCE WAS STARTED 


5437 


041550 


000776 








BR 


.-2 


{ BEFORE THE POWER DOWN WAS COMPLETE 


5438 


041552 


000000 






$SAVR6: 







{PUT THE SP HERE 


5439 


041554 


006412 


050040 


053517 


PWRMSG: 


.ASCIZ 


<12><15>? POWER FAILURE - RESTARTING ?<12><15> 


5440 


041562 


051 105 


043040 


044501 










5441 


041570 


052514 


042522 


026440 










5442 


041576 


051040 


051505 


040524 










5443 


041604 


052122 


047111 


020107 










5444 


041612 


006412 


000 












5445 




041616 








.EVEN 






5446 


















5447 
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EMi: .ASCIZ /UNEXPECTED CPU TRAP TO LOC. 004/ 



EM2: .ASCIZ /UNEXPECTED MEM. MGMT. TRAP TO LOC. 250/ 



5448 










5449 


041 61 6 


0471 25 


054105 


042520 


5450 


04 1 624 


052 1 03 


0421 05 


041440 


5451 


041 632 


052520 


052040 


040522 


5452 


041 640 


0201 20 


047524 


046040 


5453 


04 1 646 


04 1 51 7 


020056 


030060 


5454 


041 654 


000064 






5455 


041 656 


0471 25 


054105 


042520 


5456 


041 664 


0521 03 


0421 05 


046440 


5457 


04 1672 


046505 


020056 


043515 


5458 


041 700 


0521 1 5 


020056 


051 1 24 


5459 


041 706 


0501 01 


052040 


0201 17 


5460 


041 7 1 4 


04751 4 


027103 


031040 


5461 


041 722 


030065 


000 




5462 


041 725 


1 20 


044522 


051 1 17 


5463 


041 732 


0521 1 1 


0201 31 


044502 


5464 


041 740 


051524 


051440 


052105 


5465 


041 746 


053440 


047522 


043516 


5466 


041 754 


044440 


0201 16 


051520 


5467 


041 762 


000 1 27 






5468 


041 764 


04751 5 


042504 


041040 


5469 


041 772 


0521 1 1 


020123 


042523 


5470 


042000 


0201 24 


051 127 


0471 17 


5471 


042006 


0201 07 


0471 1 1 


050040 


5472 


0420 1 4 


053523 


000 




5473 


04201 7 


1 04 


040525 


0201 14 


5474 


042024 


0421 01 


051 104 


051505 


5475 


042032 


044523 


043516 


041040 


5476 


042040 


0521 05 


042527 


047105 


5477 


042046 


044040 


0231 1 1 


047514 


5478 


042054 


04 1 040 


052131 


051505 


5479 


042062 


047440 


0201 06 


05152U 


5480 


042070 


0001 27 






5481 


042072 


04251 3 


047122 


0461 05 


5482 


0421 00 


05 1 040 


020066 


0441 03 


5483 


0421 06 


0471 01 


042507 


0201 04 


5484 


0421 1 4 


054502 


053440 


044522 


5485 


0421 22 


044524 


043516 


052440 


5486 


0421 30 


042523 


020122 


0331 22 


5487 


0421 36 


000 






5486 


0421 37 


101 


046440 


046505 


5489 


0421 44 


051 1 1 7 


020131 


043515 


5490 


042 1 52 


0521 1 5 


020056 


042522 


5491 


042160 


027107 


052040 


046511 


5492 


042166 


042105 


047440 


052125 


5493 


0421 74 


000 






5494 


042175 


123 


046525 


040515 


5495 


042202 


054522 


047440 


020106 


5496 


042210 


042515 


027115 


046440 


5497 


042216 


046507 


027124 


051040 


5498 


042224 


043505 


020056 


044524 


5499 


042232 


042515 


052517 


051524 


5500 


042240 


000 






5501 


042241 


115 


046505 


020056 


5502 


042246 


043515 


052115 


020056 


5503 


042254 


042522 


027107 


053440 



EM3: .ASCIZ /PRIORITY BITS SET WRONG IN PSW/ 



EM4: .ASCIZ /MODE BITS SET WRONG IN PSW/ 



ems: .ASCIZ /DUAL ADDRESSING BETWEEN HIALO BYTES OF PSW/ 



EM6: .ASCIZ /KERNEL R6 CHANGED BY WRITING USER R6/ 



EM7: .ASCIZ /A MEMORY MGMT. REG. TIMED OUT/ 



EMIO: .ASCIZ /SUMMARY OF MEM. MGMT. REG. TIMEOUTS/ 



EMIi: .ASCIZ /MEM. MGMT. REG. WOULD NOT CLEAR/ 
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SEO 011S 



5504 


042262 


052517 


0421 14 


047040 


5505 


042270 


052117 


041440 


042514 


5506 


042276 


051 101 


000 - 




5507 


042301 


115 


046505 


020056 


5508 


042306 


043515 


052115 


020056 


5509 


042314 


042522 


027107 


041040 


5510 


042322 


0521 1 1 


020123 


047516 


5511 


042330 


020124 


042523 


020124 


5512 


042336 


047503 


051 122 


041505 


5513 


042344 


046124 


000131 




5514 


042350 


051 123 


020060 


043105 


5515 


042356 


042506 


052103 


042105 


5516 


042364 


041040 


020131 


051 127 


5517 


042372 


0521 1 1 


020105 


047524 


5518 


042400 


050040 


053523 


000 


5519 


042405 


123 


030522 


042040 


5520 


042412 


0421 1 1 


047040 


0521 17 


5521 


042420 


051040 


040505 


020104 


5522 


042426 


046101 


0201 14 


042532 


5523 


042434 


047522 


000123 




5524 


042440 


052504 


046101 


040440 


5525 


042446 


042104 


042522 


051523 


5526 


042454 


0471 1 1 


020107 


042502 


5527 


042462 


053524 


042505 


0201 16 


5528 


042470 


054502 


042524 


020123 


5529 


042476 


0431 17 


050040 


051 101 


5530 


042504 


047440 


020122 


042120 


5531 


042512 


000122 






5532 


042514 


052504 


046101 


040440 


5533 


042522 


042104 


042522 


051523 


5534 


042530 


0471 1 1 


020107 


042502 


5535 


042536 


053524 


042505 


0201 16 


5536 


042544 


040520 


026522 


042120 


5537 


042552 


023:;22 


000123 




5538 


042556 


044120 


051531 


020056 


5539 


042564 


042101 


051 104 


020056 


5540 


042572 


047506 


046522 


042105 


5541 


042600 


053440 


047522 


043516 


5542 


042606 


044440 


0201 16 


040515 


5543 


042614 


0471 1 1 


027124 


046440 


5544 


042622 


0421 17 


000105 




5545 


042626 


044120 


051531 


020056 


5546 


042634 


042101 


051 104 


020056 


5547 


042642 


047506 


046522 


042105 


5548 


042650 


053440 


047522 


043516 


5549 


042656 


044440 


0201 16 


042522 


5550 


042664 


047514 


040503 


042524 


5551 


042672 


046440 


0421 17 


000105 


5552 


042700 


026527 


044502 


020124 


5553 


042706 


044504 


020104 


047516 


5554 


042714 


0201 24 


042507 


0201 24 


5555 


042722 


042523 


020124 


0471 1 1 


5556 


042730 


050040 


051 104 


000 


5557 


042735 


127 


041055 


0521 1 1 


5558 


042742 


051440 


052105 


044440 


5559 


042750 


0201 16 


047515 


042523 



.ASCIZ /MEM. MGMT. REG. BITS NOT SET CORRECTLY/ 



.ASCIZ /SRO EFFECTED BY WRITE TO PSW/ 



.ASCIZ /SRI DID NOT READ ALL ZEROS/ 



.ASCIZ /DUAL ADDRESSING BETWEEN BYTES OF PAR OR PDR/ 



.ASCIZ /DUAL ADDRESSING BETWEEN PAR-PDR'S/ 



.ASCIZ /PHYS. ADDR. FORMED WRONG IN MAINT. MODE/ 



.ASCIZ /PHYS. ADDR. FORMED WRONG IN RELOCATE MODE/ 



.ASCIZ /W-BIT DID NOT GET SET IN PDR/ 



.ASCIZ /W-BIT SET IN MORE THAN ONE PDR/ 
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5560 


042756 


052040 


04051 


0201 16 


5561 


042764 


047 1 17 


0201 05 


0421 20 


5562 


042772 


0001 22 






5563 


042774 


026527 


044502 


0201 24 


5564 


043002 


04751 6 


0201 24 


0461 03 


5565 


ndTD 1 n 
y-tou 1 w 


04 0505 


042522 


0201 04 




0430 1 6 


054502 


053440 


044522 


5567 


043024 


044524 


04351 6 


052040 


5568 




0201 1 7 


0421 20 


0001 22 


5569 


043040 


05 1 127 


0521 1 1 


0471 1 1 


5570 


043046 


0201 07 


051 1 23 


020060 


557 1 


043054 


042523 


0201 24 


026527 




043062 


044502 


0201 24 


0471 1 1 


5573 


w*t / u 




0501 1 1 


051 1 04 




043076 


000067 






5575 


043 1 00 


026527 


044502 


0201 24 


5576 


0431 06 


047507 


0201 24 


042523 


5577 




0201 24 


052504 


044522 


5578 


0431 22 


0435 1 6 


047440 


0421 04 


5579 


043 1 30 


040440 


0421 04 


0271 22 


5580 


0431 36 


04 U440 


047502 


0521 22 


5581 


0431 44 


000 






5582 


0431 45 


1 1 5 


046505 


051 1 1 7 


5583 


043 1 52 


0201 31 


043515 


0521 15 


5584 


0431 60 


020056 


041501 


042503 




0431 66 


05 1 523 


040440 


047502 


5586 




052 1 22 


042040 


0421 1 1 


5587 


043202 


047040 


0521 1 7 


047440 


5588 


0432 1 


04 1 503 


051 1 25 


000 


5589 


043215 


101 


04 1 503 


051505 


5590 


043222 


02 01 23 


051 1 05 


047522 


5591 


043230 


02 1 22 


044504 


0201 04 


5592 




04 75 1 6 


0201 24 


041 1 01 


5593 


043244 


05 1117 


0201 24 


0471 1 1 






052 1 23 


052522 


0521 03 


5595 


043250 


0475 1 1 


0001 16 




5596 


043264 


05 1 1 23 


020060 


044504 


5597 


043272 


020104 


047516 


0201 24 


5598 


043300 


042522 


047520 


0521 22 




043306 


040440 


04 1 503 


051 505 


5600 


043314 


02 0123 


051 1 05 


047522 


5601 


043322 


020122 


047503 


051 1 22 


5602 


043330 


04 1 505 


0461 24 


0001 31 


5603 


043336 


044504 


0201 04 


04751 6 


5604 


043344 


0201 24 


047514 


045503 


5605 


043352 


050125 


041440 


051 1 17 


5606 


043360 


042522 


052103 


053040 


5607 


043356 


051 1 1 1 


052524 


046101 


5608 


043374 


040440 


042104 


0271 22 


5609 


043402 


000 






5610 


043403 


120 


043501 


020105 


561 1 


043410 


043514 


044124 


02005'" 


5612 


043416 


041 101 


051 117 


020124 


5613 


043424 


041517 


052503 


051 122 


5614 


043432 


042105 


053440 


042510 


5615 


043440 


020116 


052111 


051 440 



.ASCIZ /W-BIT NOT CLEARED BY WRITING TO PDR/ 



.ASCIZ /WRITING SRO SET W-BIT IN KIPDR7/ 



.ASCIZ /W-BIT GOT SET DURING ODD ADOR. ABORT/ 



.ASCIZ /MEMORY MGMT. ACCESS ABORT DID NOT OCCUR/ 



.ASCIZ /ACCESS ERROR DID NOT ABORT INSTRUCTION/ 



.ASCIZ /SRO DID NOT REPORT ACCESS ERROR CORRECTLY/ 



.ASCIZ /DID NOT LOCKUP CORRECT VIRTUAL ADOR./ 



£1832: .ASCIZ /PAGE LGTH. ABORT OCCURRED WHEN IT SHOULDN'T HAVE/ 
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5616 


043446 


047510 


046125 


047104 


5G17 


043454 


052047 


044040 


053101 


5618 


043462 


000105 






5619 


043464 


040520 


042507 


046040 


5620 


043472 


052107 


0271 10 


040440 


5621 


043500 


047502 


052122 


042040 


5622 


043506 


0421 1 1 


047040 


0521 17 


5623 


043514 


047440 


041503 


051 125 


5624 


043522 


053440 


042510 


0201 16 


5625 


043530 


0521 1 1 


051440 


047510 


5626 


043536 


046125 


020104 


040510 


5627 


043544 


042526 


000 




5628 


043547 


123 


030122 


042040 


5629 


043554 


0421 1 1 


047040 


0521 17 


5630 


043562 


051040 


050105 


051 1 17 


5631 


043570 


020124 


040520 


042507 


5632 


043576 


046040 


052107 


0271 10 


5633 


043604 


040440 


047502 


052122 


5634 


043612 


041440 


051 1 17 


042522 


5635 


043620 


052103 


054514 


000 


5636 


043625 


123 


030122 


047440 


5637 


043632 


020122 


051 123 


020062 


5638 


043640 


044103 


047101 


042507 


5639 


043646 


020104 


054502 


040440 


5640 


043654 


051440 


041505 


0471 17 


5641 


043662 


020104 


041 101 


051 1 17 


5642 


043670 


000124 






5543 


043672 


051 123 


020060 


051 117 


5644 


043700 


051440 


031 122 


053440 


5645 


043706 


051 105 


020105 


047516 


5646 


043714 


020124 


051042 


051505 


5647 


043722 


052105 


020042 


05450* 


5648 


043730 


040440 


051040 


051505 


5649 


043736 


052105 


000 




5650 


043741 


123 


031 122 


047040 


5651 


043746 


0521 17 


052040 


040522 


5652 


043754 


045503 


047111 


020107 


5653 


043762 


047503 


051 122 


041505 


5654 


043770 


046124 


000131 




5655 


043774 


044504 


020104 


047516 


5656 


044002 


020124 


051124 


0501 01 


5657 


044010 


052040 


051 1 10 


020125 


5658 


044016 


042513 


047122 


046105 


5659 


044024 


051440 


040520 


042503 


5660 


044032 


000 






5661 


044033 


113 


020124 


051 105 


5662 


044040 


047522 


020122 


042523 


5663 


044046 


053122 


041511 


042105 


5664 


044054 


047440 


0201 16 


0421 17 


5665 


044062 


0201 04 


042101 


051 104 


5666 


044070 


020056 


051 105 


047522 


5667 


044076 


000122 






5668 


0441 00 


051 ^23 


020060 


0511 17 


5669 


0441 06 


051440 


031 122 


041440 


5670 


0441 14 


040510 


043516 


042105 


5671 


044122 


041040 


020131 


0421 17 



.ASCIZ /PAGE LGTH. ABORT DID NOT OCCUR WHEN IT SHOULD HAVE/ 



.ASCIZ /SRO DID NOT REPORT PAGE LGTH. ABORT CORRECTLY/ 



EM37: .ASCIZ /SRO OR SR2 CHANGED BY A SECOND ABORT/ 



.ASCIZ /SRO OR SR2 WERE NOT "RESET" BY A RESET/ 



.ASCIZ /SRa NOT TRACKING CORRECTLY/ 



.ASCIZ /DID NOT TRAP THRU KERNEL SPACC/ 



EM43: .ASCIZ /KT ERROR SERVICED ON ODD ADDR. ERROR/ 



.ASCIZ /SRO OR SR2 CHANGED BY ODD ADDR. ERROR/ 



CFKTHBO PDP 11/34 MEM MGNT DIAG MACYIt 30A(1052) 27-JUN-78 09:33 PAGE 119 

ERROR MESSAGES, DATA HEADERS-TABLES & FORMATS 



.ASCXZ /ERROR DURING "DOUBLE ERROR" (KT & ODD ADDR. )/ 



;rKTHB. 


P1 1 : 


27-JUN-78 


• 09:27 




5672 


0441 30 


020104 


042101 


051 104 


5673 


0441 36 


020056 


051 105 


047522 


5674 


0441 44 


000122 






5675 


0441 46 


051 105 


047522 


020122 


5G76 


044154 


052504 


044522 


043516 


5677 


0441 62 


021 040 


047504 


041 125 


5678 


0441 70 


042514 


042440 


051 122 


5679 


.044176 


051 1 17 


020042 


045450 


56B0 


044204 


0201 24 


020046 


0421 17 


5681 


044212 


020104 


042101 


051 104 


5682 


044220 


024456 


000 




5683 


044223 


115 


050106 


0201 1 1 


5684 


044230 


0471 1 1 


052123 


052522 


5685 


044236 


052103 


04751 1 


0201 16 


5686 


044244 


052520 


044123 


042105 


5687 


044252 


053440 


047522 


043516 


5688 


044260 


042040 


052101 


000101 


5689 


044266 


0521 15 


044520 


044440 


5690 


044274 


051516 


051 124 


041525 


56D1 


044302 


044524 


0471 17 


046040 


5692 


044310 


040517 


042504 


020104 


5693 


044316 


051 127 


047117 


020107 


5694 


044324 


040504 


040524 


000 


5695 


044331 


123 


040524 


045503 


5696 


044336 


047040 


0521 17 


050040 


5(597 


044344 


051525 


042510 


0201 04 


5598 


044352 


054502 


046440 


050106 


5699 


044360 


02651 1 


0521 15 


044520 


5700 


044366 


000 






5701 


044367 


113 


051 105 


042516 


5702 


044374 


0201 14 


040520 


042507 


5703 


044402 


040440 


041503 


051505 


5704 


044410 


020123 


0471 1 1 


052123 


5705 


044416 


040^05 


020104 


0431 1 / 


5706 


044424 


052440 


042523 


035122 


5707 


044432 


046440 


050106 


02651 1 


5708 


044440 


0521 15 


044520 


000 


5709 


044445 


127 


047522 


043516 


5710 


044452 


050040 


051 104 


051447 


5711 


044460 


051040 


043105 


051 105 


5712 


044466 


047105 


042503 


020104 


5713 


044474 


044127 


0461 1 1 


020105 


5714 


04^502 


0471 1 1 


051040 


046105 


5715 


044510 


041517 


052101 


020105 


5716 


044516 


047515 


042504 


000 


5717 


044523 


115 


050106 


0201 04 


5718 


04^530 


0471 1 1 


052123 


052522 


5719 


044536 


052103 


04751 1 


0201 16 


5720 


044544 


052520 


044123 


042105 


5721 


044552 


053440 


047522 


043516 


5722 


044560 


042040 


052101 


000101 


5723 


044566 


052123 


041501 


0201 13 


5724 


044574 


047516 


020124 


052520 


5725 


044602 


044123 


042105 


041040 


5726 


044610 


020131 


043115 


042120 


5727 


044616 


046455 


050124 


000104 



sm 0118 



.ASCIZ /MFP»I INSTRUCTION PUSHED WRONG DATA/ 



.ASCII /MTPI INSTRUCTION LOADED WRONG DATA/ 



.ASCIZ /STACK NOT PUSHED BY MFPI-MTPI/ 



.ASCIZ /KERNEL PAGE ACCESS INSTEAD OF USER: MFPI-MTPI/ 



.ASCIZ /WRONG PDR'S REFERENCED WHILE IN RELOCATE MODE/ 



.ASCIZ /MFPD INSTRUCTION PUSHED WRONG DATA/ 



.ASCIZ /STACK NOT PUSHED BY MFPD-MTPD/ 
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5: .ASCIZ /PAR OR PDR CHANGED BY A RESET/ 



.ASCIZ /ILLEGAL MODE 01 NOT ABORTED/ 



SEO 0119 



5728 


044624 


040520 


020122 


051 1 17 


5729 


044632 


050040 


051 104 


041440 


5730 


044640 


040510 


043516 


042105 


5731 


044646 


041040 


020131 


020101 


5732 


044654 


042522 


042523 


000124 


5733 


044662 


0461 1 1 


042514 


040507 


5734 


044670 


0201 14 


047515 


042504 


5735 


044676 


030040 


020061 


047516 


5736 


044704 


020124 


041 101 


051 117 


5737 


044712 


042524 


000104 




5738 


044716 


051 123 


020060 


044504 


5739 


044724 


020104 


047516 


0201 24 


5740 


044732 


042522 


047520 


052122 


5741 


044740 


044 - AO 


0461 14 


0435013 


5742 


044746 


046101 


046440 


0421 17 


5743 


044754 


020105 


030460 


041440 


5744 


044762 


051 1 17 


042522 


052103 


5745 


044770 


054514 


000 




5746 


044773 


120 


053523 


041440 


5747 


045000 


040510 


043516 


0421 05 


5748 


045C06 


041040 


020131 


047101 


5749 


045014 


051040 


044524 


044440 


5750 


045022 


0201 16 


051525 


051 105 


5751 


045030 


046440 


0421 17 


000105 


5752 


045036 


040515 


047111 


027124 


5753 


045044 


046440 


0421 17 


020105 


5754 


045052 


051450 


030122 


036040 


5755 


045060 


037070 


020051 


047516 


5756 


045066 


020124 


044504 


040523 


5757 


045074 


046102 


042105 


041040 


5758 


0451 02 


020131 


020101 


042522 


5759 


0451 10 


042523 


000124 




5760 


0451 14 


040504 


040524 


044440 


5761 


045122 


041516 


051 1 17 


042522 


5762 


045130 


052103 


040440 


052106 


5763 


045136 


051 105 


040440 


046440 


5764 


045144 


044501 


0521 16 


020056 


5765 


045152 


047515 


042504 


053440 


5766 


045160 


044522 


042524 


000 


5767 


045165 


123 


052517 


041522 


5768 


045172 


020105 


042522 


047514 


5769 


045200 


040503 


042524 


020104 


5770 


045206 


0471 1 1 


046440 


044501 


5771 


045214 


0521 16 


020056 


047515 


5772 


045222 


042504 


000 




5773 


045225 


116 


0471 17 


051040 


5774 


045232 


051505 


0421 1 1 


047105 


5775 


045240 


020124 


041 101 


051 1 17 


5776 


045246 


020124 


044504 


020104 


5777 


045254 


047516 


020124 


041517 


5778 


045262 


052503 


000122 




5779 


045266 


051 105 


047522 


0201 2r 


5780 


045274 


046106 


043501 


043040 


5781 


045302 


051 1 17 


047040 


020122 


5782 


045310 


041 101 


051117 


020124 


5783 


045316 


041050 


052111 


032461 



.ASCIZ /SRO DID NOT REPORT ILLEGAL MODE 01 CORRECTLY/ 



.ASCIZ /PSW CHANGED BY AN RTI IN USER MODE/ 



.ASCIZ /MAINT. MODE (SRO <8>) NOT DISABLED BY A RESET/ 



.ASCIZ /DATA INCORRECT AFTER A MAINT. MODE WRITE/ 



.ASCIZ /SOURCE RELOCATED IN MAINT. MODE/ 



.ASCIZ /NON RESIDENT ABORT DID NOT OCCUR/ 



.ASCIZ /ERROR FLAG FOR NR ABORT (BIT15) IN SRO DID NOT SET/ 
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SEO 0120 



5784 


045324 


020051 


0471 1 1 


051440 


5785 


045332 


030122 


042040 


0421 1 1 


5786 


045340 


047040 


0521 17 


051440 


5787 


045346 


052105 


000 




5788 


045351 


123 


031 122 


042040 


5789 


045356 


0421 1 1 


047040 


0521 17 


5790 


045364 


043040 


042522 


055105 


5791 


045372 


020105 


044124 


020105 


5792 


045400 


044526 


052122 


040525 


5793 


045406 


0201 14 


042101 


051 1 04 


5794 


045414 


020123 


0431 17 


052040 


5795 


045422 


042510 


040440 


047502 


5796 


045430 


052122 


020104 


0471 1 1 


5797 


045436 


051 124 


000 




5798 


045441 


062 


0421 16 


047040 


5799 


045446 


0471 17 


051040 


051505 


5800 


045454 


0421 1 1 


047105 


0201 24 


5(301 


045462 


041 101 


051 1 17 


020124 


5802 


045470 


044504 


020104 


047516 


5303 


0^5476 


020124 


041517 


052503 


5R04 


045504 


000122 






5805 


045506 


047052 


020104 


047516 


5906 


15514 


0201 16 


042522 


044523 


5807 


045522 


042504 


0521 16 


040440 


5803 


045530 


047502 


052122 


041440 


5909 


045536 


052501 


042523 


0201 04 


5310 


045544 


051 123 


020062 


047524 


581 1 


045552 


041440 


040510 


043516 


5312 


045560 


000105 






5813 


045562 


051 123 


020060 


040527 


5U14 


045570 


020123 


047516 


0201 2^ 


5815 


045576 


046103 


040505 


04252:* 


5816 


045604 


020104 


054502 


044440 


5817 


045612 


044516 


027124 


000040 


5818 










5819 


045620 


0461 17 


020104 


041520 


5820 


045626 


020040 


0461 17 


0201 04 


5821 


045634 


051520 


020127 


0331 22 


5822 


C45642 


053440 


051501 


020040 


5823 


045650 


042524 


052123 


047516 


5824 


045656 


020040 


051 105 


047522 


5825 


045664 


050122 


000103 




5826 


045670 


0461 17 


020104 


041520 


5827 


045676 


020040 


0461 17 


0201 04 


5828 


045704 


051520 


020127 


0331 22 


5829 


045712 


053440 


051501 


020040 


5830 


045720 


051 123 


020060 


020040 


5831 


045726 


020040 


051 123 


020062 


5832 


045734 


020040 


020040 


042524 


5833 


045742 


052123 


047516 


020040 


5834 


045750 


051 105 


047522 


050122 


5835 


045756 


000103 






5836 


045760 


051-27 


052117 


0201C3 


5837 


045766 


020040 


042522 


042101 


5838 


045774 


020040 


020040 


042524 


5839 


046002 


052123 


047516 


020040 



.ASCIZ /SRa DID NOT FREEZE THE VIRTUAL ADORS OF THE ABORTD INTR/ 



.ASCIZ /2N0 NON RESIDENT ABORT DID NOT OCCUR/ 



EM70: .ASCIZ /2ND NON RESIDENT ABORT CAUSED SR2 TO CHANGE/ 



EM7i: .ASCIZ /SRO WAS NOT CLEARED BY INIT. / 



DHi: .ASCIZ /OLD PC OLD PSW R6 WAS TESTNO ERRORPC/ 



DH2: .ASCIZ /OLD PC OLD PSW R6 WAS SRO SR2 TESTNO ERRORPC/ 



DH3: .ASCIZ /WROTE READ TESTNO ERRORPC/ 
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.ASCIZ /ADDRESS TESTNO ERRORPC/ 



SEQ 0121 



5840 


046010 


051 105 


047522 


050122 


5841 


046016 


000103 






5842 


046020 


042101 


051 104 


051505 


5843 


046026 


020123 


042524 


052123 


5844 


046034 


047516 


020040 


051 105 


5845 


046042 


047522 


050122 


000103 


5846 


046050 


042522 


044507 


052123 


5847 


046056 


051 105 


040455 


042104 


5848 


046064 


051522 


020040 


052516 


5849 


046072 


0201 15 


047440 


100106 


5850 


0461 00 


047101 


026504 


042105 


5851 


0461 06 


020040 


051 117 


04245E 


5852 


0461 14 


020104 


020040 


044524 


5853 


0461 22 


047515 


052125 


020123 


5854 


046130 


042524 


052123 


047516 


5855 


046136 


020040 


051 105 


047522 


5856 


0461 44 


050122 


000103 




5857 


046150 


042522 


044507 


052123 


5858 


046156 


020122 


042522 


042101 


5059 


046164 


020040 


020040 


042522 


5860 


0461 72 


042101 


024055 


044502 


5861 


046200 


040516 


054522 


100051 


5862 


046206 


042101 


051 104 


051505 


5863 


046214 


020123 


047450 


052103 


5864 


046222 


046101 


020051 


032065 


5865 


046230 


031063 


030061 


034071 


5866 


046236 


033067 


032065 


031063 


5867 


046244 


030061 


020040 


042524 


5868 


046252 


052123 


047516 


020040 


5869 


046260 


051 105 


047522 


0501 22 


5870 


046266 


000103 






5871 


046270 


042522 


044507 


052 1 23 


5872 


046276 


020122 


051 127 


0521 17 


5873 


046304 


020105 


020040 


042522 


5874 


046312 


042101 


020040 


020040 


5875 


046320 


042522 


042101 


024055 


5376 


046326 


044502 


040516 


054522 


5877 


046334 


100051 






5878 


046336 


042101 


051 104 


051505 


5879 


046344 


020123 


047450 


052103 


5880 


046352 


046101 


020051 


047450 


5881 


046360 


052103 


046101 


020051 


5882 


046366 


032065 


031063 


030061 


5883 


046374 


034071 


033067 


032065 


5884 


046402 


031063 


030061 


020040 


5885 


046410 


042524 


052123 


047516 


5886 


046416 


020040 


051 105 


047522 


5887 


046424 


050122 


000103 




5888 


046430 


042522 


042101 


020040 


5889 


046436 


020040 


042524 


052123 


5890 


046444 


047516 


020040 


051 105 


5891 


046452 


047522 


050122 


000103 


5892 


046460 


040520 


026522 


042120 


5893 


046456 


020122 


040520 


026522 


5894 


046474 


042120 


100122 




5895 


046500 


046103 


040505 


042522 



.ASCII /REGISTER-ADDRS NUM OF/<CRLF> 

.ASCIZ /AND-ED OR-ED TIMOUTS TESTNO ERRORPC/ 

.ASCII /REGISTR READ READ-( BINARY )/<CRLF> 

.ASCIZ /ADDRESS (OCTAL) 5432109876543210 TESTNO ERRORPC/ 

.ASCII /REGISTR WROTE READ READ-( BINARY)/<CRLF> 

.ASCIZ /ADDRESS (OCTAL) (OCTAL) 54321 09876S432 10 TESTNO ERRORPC/ 



.ASCIZ /READ TESTNO ERRORPC/ 
.ASCII /PAR-PDR PAR-PDR/<CRLF> 

.ASCIZ /CLEARED EFFECTD EXPECTD RECEIVD TESTNO ERRORPC/ 
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.ASCII /PHYSICL VIRTUAL/<CRLF> 

.ASCIZ /ADDRESS ADDRESS KIPAR4 TESTNO ERRORPC/ 



SEO 0132 



5896 


046506 


020104 


0431 05 


042506 


5897 


046514 


052103 


020104 


0541 05 


5898 


046522 


042520 


052103 


0201 04 


5899 


046530 


042522 


042503 


0531 11 


5900 


046536 


0201 04 


042524 


0521 23 


5901 


046544 


047516 


020040 


051 1 05 


5902 


046552 


047522 


050122 


0001 03 


5903 


046560 


044120 


051531 


041 51 1 


5904 


046566 


0201 14 


044526 


0521 22 


5905 


046574 


040525 


1001 14 




5906 


046600 


042101 


051 104 


051505 


5907 


046506 


020123 


042101 


051 1 04 


5908 


046614 


051505 


020123 


044513 


5909 


046622 


04 0. -20 


032122 


020040 


5910 


046630 


042524 


052123 


047516 


591 1 


046636 


020040 


051 105 


047522 


5912 


046644 


050122 


000103 




5913 


046650 


044120 


051531 


04151 1 


5914 


046656 


0201 14 


040520 


0201 22 


5915 


046664 


020064 


020040 


040520 


5916 


046672 


020122 


100065 




5917 


046676 


042101 


051 1 04 


051 505 


5918 


046704 


020123 


041 1 26 


0201 01 


5919 


046712 


020040 


020040 


041 1 26 


5920 


046720 


0201 01 


020040 


020040 


5921 


046726 


040520 


020122 


020064 


5922 


046734 


020040 


040520 


0201 22 


5923 


046742 


020065 


020040 


051520 


5924 


046750 


020127 


020040 


020040 


5925 


046756 


042524 


052123 


047516 


5926 


046764 


020040 


051 105 


047522 


5927 


046772 


050122 


000103 




5928 


046776 


042120 


020122 


020040 


5929 


047004 


020040 


044526 


0521 22 


5930 


047012 


040525 


1001 14 




5931 


047016 


042524 


052123 


0421 05 


5932 


047024 


020040 


042101 


051 1 04 


5933 


047032 


051505 


020123 


042524 


5934 


047040 


052123 


047516 


020040 


5935 


047046 


051 105 


047522 


0501 22 


5936 


047054 


000103 






5937 


047056 


042120 


020122 


0471 1 1 


5938 


047064 


020040 


042120 


0201 22 


5939 


047072 


020040 


020040 


044526 


5940 


047100 


052122 


040525 


114 


5941 


0471 05 


105 


051 122 


051 1 17 


5942 


0471 12 


020040 


052040 


051505 


5943 


047120 


042524 


020104 


040440 


5944 


047126 


042104 


042522 


051523 


5945 


0471 34 


052040 


051505 


047124 


5946 


047142 


0201 17 


042440 


051 122 


5947 


047150 


051 117 


041520 


00^ 


5948 


047155 


120 


051 104 


020040 


5949 


047162 


020040 


052040 


051505 


5950 


047170 


047124 


0201 17 


042440 


5951 


047176 


051122 


051117 


041520 



.ASCII /PHYSICL PAR 4 PAR 5/<CRLF> 



.ASCIZ /ADDRESS VBA VBA PAR 4 PAR 5 PSW 



TESTNO ERRORPC/ 



.ASCII /PDR VIRTUAL/<CRLF> 

.ASCIZ /TESTED ADDRESS TESTNO ERRORPC/ 



.ASCII /PDR IN PDR VIRTUAL/ 



.ASCIZ /ERROR TESTED ADDRESS TESTNO ERRORPC/ 



.ASCIZ /PDR TESTNO ERRORPC/ 
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.ASCIZ /PDR WAS EXPECTD TESTNO ERRORPC/ 



SEO 0123 



5952 


047204 


000 






5953 


047205 


120 


051 104 


053440 


5954 


047212 


051501 


042440 


050130 


5955 


047220 


041505 


042124 


052040 


5956 


047226 


051505 


047124 


0201 17 


5957 


047234 


042440 


051 122 


051 1 17 


5958 


047242 


041520 


000 




5959 


047245 


120 


051 104 


032040 


5960 


047252 


020040 


050040 


053523 


5961 


047260 


020040 


020040 


052040 


5962 


047266 


051505 


047124 


0201 17 


5963 


047274 


042440 


051 122 


051 117 


5964 


047302 


041520 


000 




5965 


047305 


123 


030122 


053440 


5966 


047312 


051501 


042440 


050130 


5967 


047320 


041505 


042124 


050040 


5968 


047326 


051 104 


032040 


020040 


5969 


047334 


050040 


053523 


020040 


5970 


047342 


020040 


052040 


051505 


5971 


047350 


04 7 124 


0201 17 


042440 


5972 


047356 


051 122 


051117 


041520 


5973 


047364 


000 






5974 


047365 


123 


031 122 


053440 


5375 


047372 


051501 


042440 


050130 


5976 


04740C 


041505 


042124 


050040 


5977 


047406 


051 104 


032040 


020040 


5978 


047414 


050040 


053523 


020040 


5979 


04' 422 


020040 


052040 


051505 


5980 


047430 


047124 


0201 17 


042440 


5981 


047436 


051 122 


051 117 


041520 


5982 


047444 


000 






5383 


047445 


126 


041056 


04045b 


5984 


047452 


020056 


045440 


0501 1 1 


5985 


047460 


051 104 


020064 


051440 


5986 


047466 


030122 


053440 


051501 


5987 


047474 


051440 


031 122 


053440 


5988 


047502 


051501 


052040 


051505 


5989 


047510 


047124 


0201 17 


042440 


5990 


047516 


051 122 


051117 


041520 


5991 


047524 


000 






5992 


047525 


126 


041056 


040456 


5993 


047532 


020056 


045440 


0501 1 1 


5994 


047540 


051 104 


020064 


052040 


5995 


047546 


051505 


047124 


0201 17 


5996 


047554 


042440 


051 122 


051 1 17 


5997 


047562 


041520 


000 




5998 


047565 


126 


041056 


040456 


5999 


047572 


020056 


045440 


0501 1 1 


6000 


047600 


051 104 


020064 


051440 


6001 


047606 


030122 


053440 


051501 


6002 


047614 


042440 


050130 


041505 


6003 


047622 


042124 


052040 


051505 


6004 


047630 


047'24 


0201 17 


042440 


6005 


047636 


051 122 


051117 


041520 


6006 


047644 


000 






6007 


047645 


126 


041056 


040456 



.ASCIZ /PDR 4 PSW TESTNO ERRORPC/ 



.ASCIZ /SRO WAS EXPECTD PDR 4 PSW TESTNO ERRORPC/ 



DH3i: .ASCIZ /SR2 WAS EXPECTD PDR 4 PSW TESTNO ERRORPC/ 



.ASCIZ /V.B.A. KIPDR4 SRO WAS SR2 WAS TESTNO ERRORPC/ 



.ASCIZ /V.B.A. KIPDR4 TESTNO ERRORPC/ 



.ASCIZ /V.B.A. KIPDR4 SRO WAS EXPECTD TESTNO ERRORPC/ 



.ASCIZ /V.B.A. KIPDR4 SR2 WAS EXPECTD TESTNO ERRORPC/ 
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SEQ 0124 



6008 


047652 


020356 


045440 


0501 1 1 


6009 


047660 


051 1 04 


020064 


051 440 


6010 


047666 


031 1 22 


053440 


051501 


6011 


047674 


042440 


050130 


041 505 


6012 


047702 


0421 24 


052040 


051 505 


6013 


047710 


0471 24 


0201 17 


042440 


6014 


047716 


051 122 


051 1 17 


04 1 520 


6015 


047724 


000 






6016 


047725 


1 23 


031 1 22 


053440 


6017 


047732 


051501 


042440 


050 1 30 


6018 


047740 


041 505 


0421 24 


052040 


6019 


047746 


05 1 505 


0471 24 


0201 1 7 


6020 


047754 


042440 


051 1 22 


051 1 1 7 


6021 


047762 


041520 


000 




6022 


047765 


1 06 


051 11 1 


052 1 23 


6023 


047772 


040440 


047502 


052 1 22 


6024 


050000 


020040 


020040 


051 440 


6025 


050005 


041505 


0471 1 7 


0201 04 


6026 


050014 


041 1 01 


051117 


1 00 1 24 


6027 


050022 


051 123 


020060 


040527 


6028 


050030 


0201 23 


05 1 1 23 


020062 


6029 


050036 


040527 


0201 23 


051 1 23 


6030 


050044 


020060 


040527 


0201 23 


6031 


050052 


051 1 23 


020062 


040527 


6032 


050060 


0201 23 


042524 


0521 23 


6033 


050066 


047516 


020040 


051 1 05 


6034 


050074 


047522 


0501 22 


000 1 03 


6035 


050102 


051 1 23 


020060 


040527 


6036 


0501 10 


0201 23 


051 1 23 


020062 


6037 


0501 IS 


040527 


0201 23 


042524 


6038 


050124 


0521 23 


047516 


020040 


6039 


0501 32 


05 1 1 05 


047522 


0501 22 


6040 


0501 40 


0001 03 






6041 


0501 42 


051 j20 


0201 27 


040527 


6042 


0501 50 


0201 23 


033122 


053440 


6043 


050156 


051501 


020040 


042524 


6044 


0501 64 


0521 23 


047516 


020040 


6045 


0501 72 


051 105 


047522 


050 1 22 


6046 


050200 


0001 03 






6047 


050202 


0541 05 


042520 


0521 03 


6048 


050210 


0421 05 


020040 


020040 


6049 


050216 


020040 


020040 


051 040 


6050 


050224 


04 1 505 


044505 


042526 


6051 


050232 


100104 






6052 


050234 


05 1123 


020060 




6053 


050242 


020040 


051 123 


020062 


6054 


050250 


020040 


020040 


051 1 23 


6055 


050256 


020060 


040527 


0201 23 


6056 


050264 


051 123 


020062 


040527 


6057 


050272 


020123 


042524 


0521 23 


6058 


050300 


047516 


020040 


051 105 


6059 


050306 


047522 


050122 


000103 


6060 


050314 


054105 


042520 


052103 


6061 


050322 


042105 


100072 




6062 


050326 


051520 


020127 


020040 


6063 


050334 


020040 


041520 


020040 



DH45: 



.ASCIZ /SR2 WAS EXPECTD TESTNO ERRORPC/ 



.ASCII /FIRST ABORT SECOND ABORT/<CRl.F> 



.ASCIZ /SRO WAS SR2 WAS SRO WAS SR2 WAS TESTNO ERRORPC/ 



.ASCIZ /SRO WAS SR2 WAS TESTNO ERRORPC/ 



.ASCIZ /PSW WAS R6 WAS TESTNO ERRORPC/ 



.ASCII /EXPECTED RECEIVED/<CRLF> 



.ASCIZ /SRO SR2 SRO WAS SR2 WAS TESTNO ERRORPC/ 



.ASCII /EXPECTED:/<CRLF> 

.ASCII /PSW PC SRO SR2/<CRLF> 
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.ASCII /170017 (3$+4) 020147 {3$)/<CRLF> 
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6064 


050342 


020040 


020040 


051 123 


6065 


050350 


020060 


020040 


020040 


6066 


050356 


051 123 


100062 




6067 


050362 


033461 


030060 


033461 


6068 


050370 


020040 


031 450 


025444 


6069 


050376 


024464 


020040 


031060 


6070 


050404 


030460 


033464 


020040 


6071 


050412 


031450 


024444 


200 


6072 


050417 


122 


041505 


044505 


6073 


050424 


042526 


035104 


200 


6074 


050431 


120 


053523 


020040 


6075 


050436 


020040 


050040 


0201 03 


6076 


050444 


020040 


020040 


051440 


6077 


050452 


030 22 


020040 


02004U 


6078 


050460 


051440 


031 122 


020040 


6079 


050466 


020040 


052040 


051505 


6080 


050474 


047124 


020117 


042440 


6081 


050502 


051 122 


051 117 


041520 


6082 


050510 


000 






6083 


05051 1 


104 


052101 


020101 


6084 


050516 


U2004U 


042040 


052101 


6085 


050524 


100101 






6086 


050526 


054105 


042520 


052103 


6087 


050534 


020104 


042522 


042503 


6088 


050542 


0531 1 1 


020104 


042524 


6089 


050550 


052123 


047516 


020040 


6090 


050556 


051 105 


047522 


050122 


6091 


050564 


000103 






6092 


050566 


042524 


052123 


047516 


6093 


050574 


020040 


051 105 


047522 


6094 


050602 


0501 22 


000103 




6095 


050606 


051 123 


020060 


040527 


6096 


050614 


0201 23 


051 123 


020062 


6097 


050622 


040527 


020123 


042524 


6098 


050630 


052123 


047516 


020040 


6099 


050636 


051 105 


047522 


050122 


6100 


050644 


000103 






6101 


05U646 


044120 


051531 


04151 1 


6102 


050654 


0201 14 


040520 


020122 


6103 


050662 


100064 






6104 


05C664 


042101 


051 104 


051505 


6105 


050672 


02C123 


027126 


027102 


6106 


050700 


027101 


020040 


040520 


6107 


050706 


020122 


020064 


020040 


6108 


050714 


051 123 


020060 


040527 


6109 


050722 


020123 


051 123 


020062 


61 10 


050730 


040527 


020123 


051520 


61 1 1 


050736 


020127 


020040 


020040 


6112 


050744 


042524 


052123 


047516 


61 13 


050752 


020040 


051 105 


047522 


6114 


050760 


050122 


000103 




61 15 


050764 


051 1 23 


020060 


04052" 


61 16 


050772 


020123 


054105 


042520 


61 17 


051000 


052103 


020104 


042524 


6118 


051006 


052123 


047516 


020040 


61 19 


051014 


051 105 


047522 


050122 



SEO 012S 



DH52: 



.ASCII /RECEIVED:/<CRLF> 

.ASCIZ /PSW PC SRO SR2 TESTNO ERRORPC/ 



.ASCII /DATA DATA/<CRLF> 

.ASCIZ /EXPECTD RECEIVD TESTNO ERRORPC/ 

.ASCIZ /TESTNO ERRORPC/ 

.ASCIZ /SRO WAS SR2 WAS TESTNO ERRORPC/ 

.ASCII /PHYSICL PAR 4/<CRLF> 

.ASCIZ /ADDRESS V.B.A. PAR 4 SRO WAS SR2 WAS PSW TESTNO ERRORPC/ 



DH57: .ASCIZ /SRO WAS EXPECTD TESTNO ERRORPC/ 
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SEO 0136 



6120 


051022 


000103 
















G121 


051024 


051520 


020127 


040527 


DH60: 


.ASCIZ 


/PSW 


WAS EXPECTD TESTNO ERRORPC/ 


6122 


051032 


020123 


054105 


042520 










6123 


051040 


052103 


020104 


042524 










6124 


051046 


052123 


047516 


020040 










6125 


051054 


051 105 


047522 


050122 










6126 


051062 


000103 
















6127 


051064 


051 123 


020060 


020040 


DH61 : 


.ASCIZ 


/SRO 


SR2 TESTNO ERRORPC/ 


6128 


051072 


020040 


051 123 


020062 










6129 


051 100 


020040 


042524 


052123 










6130 


051 106 


047516 


020040 


051 105 










6131 


051 114 


047522 


050122 


000103 










6132 


051 122 


051 123 


020062 


054105 


DH62: 


.ASCIZ 


/SR2 


EXP SR2 REC TESTNO ERRORPC/ 


6133 


051 130 


020120 


051 123 


020062 










6134 


051 136 


042522 


020103 


042524 










6135 


051 144 


052123 


047516 


042440 










6136 


051 152 


051 122 


051 117 


041520 










6137 


051 160 


000 
















6138 


051 161 


123 


030122 


042440 


DH63: 


.ASCIZ 


/SRO 


EXP SRO REC TESTNO ERRORPC/ 


6139 


051 166 


050130 


051440 


030122 










6140 


051174 


051040 


041505 


052040 










6141 


051202 


051505 


047124 


020117 










6142 


051210 


051 105 


047522 


050122 










6143 


051216 


000103 
















6144 




















6145 
6146 














.EVEN 






6147 


051220 


001356 


001360 


001354 


DTI : 


.WORD 


TRAPPC , TRAPPS , WASR6 , TESTNO , SERRPC . 


6148 


051226 


001352 


001 1 16 


000000 










6149 


051234 


001356 


001360 


001354 


DT2: 


.WORD 


TRAPPC,TRAPPS.WASR6,WASSR0.WASSR2.TESTNO,$ERRPC»0 


6150 


051242 


001366 


001370 


001352 










6151 


051250 


001 1 16 


000000 












6152 


051254 


001 162 


001 164 


001352 


DT3: 


.WORD 


$REG0,$REG1 , TESTNO, SERRPC. 


6153 


051262 


001 1 16 


000000 












6154 


051266 


001 162 


00- 


1352 


0011 16 


DT7: 


.WORD 


SREGO, TESTNO, SERRPC. 


6155 


051274 


000000 
















6156 


051276 


001374 


00- 


1376 


001400 


DTIO: 


.WORD 


ANDADR . ORADR , TONUM , TESTNO . SERRPC . 


6157 


051304 


001352 


00" 


1 116 


000000 








,$REG1 ,$REG1 .TESTNO, SERRPC, 


6158 


051312 


001 162 


00' 


1 164 


001 164 


DTIi: 


.WORD 


SREGO 


6159 


051320 


001352 


001 


1116 


000000 










6160 


051326 


001 162 


00' 


1 154 


001 166 


DT12: 


.WORD 


SREGO 


, SREGI , $REG2 , $REG2 , TESTNO , SERRPC . 


6161 


051334 


001 166 


001 


1352 


001 1 16 










6162 


051342 


000000 
















6163 


051344 


001 162 


001 


1352 


001 1 16 


DT13: 


.WORD 


SREGO 


,TESTNO, SERRPC, 


6164 


051352 


000000 
















6165 


051354 


001 162 


001 


1 164 


001 174 


DT16: 


.WORD 


SREGO 


, SREGI , $REG5 , $REG2 , TESTNO , SERRPC . 


6166 


051362 


001 166 


001 


1352 


001 116 










6167 


051370 


000000 
















6168 


051372 


001406 


001 


1402 


001172 


DTI 7: 


.WORD 


PBALO 


,VIRT1 ,$REG4, TESTNO, SERRPC, 


6169 


051400 


001352 


001 


1 116 


000000 










6170 


051406 


001406 


001 


1402 


001404 


DT20: 


.WORD 


PBALO 


, V I RT 1 , V I RT2 , $REG4 , SREGS , STMPO .TESTNO . SERRPC . 


6171 


051414 


001172 


001 


1 174 


001176 










6172 


051422 


001352 


001 


1116 


OOOOCO 










6173 


051430 


001 174 


001 


1170 


001352 


DT21 : 


.WORD 


SREGS 


, SREGS .TESTNO , SERRPC . 


6174 


051436 


001 1 16 


000000 












6175 


051442 


001162 


001174 


001170 


DT22: 


.WORD 


SREGO 


, SREGS , SREGS , TESTNO , SERRPC . 



CFKTHBO 


PDP 11/34 MEM MGNT DIAG 


MACYll 


30A(1052) 27-JI 


CFKTHB. 
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09:27 






ERROR 


MESSAGES 


6176 


051450 


001 352 


001 116 


000000 






6177 


051456 


001 174 


001352 


001 


1 116 


DT23: 


.WORD 


6178 


051464 


000000 












6179 


051466 


001 166 


001 164 


001 


1352 


DT24: 


.WORD 


6180 


051474 


001 1 16 


000000 










6181 


051500 


001 166 


001 176 


001 


1352 


DT26: 


.WORD 


6182 


051506 


001 1 16 


000000 










6183 


051512 


001366 


001 170 


001 


1 166 


DT30: 


.WORD 


6184 


051520 


001 176 


001352 


001 


1 116 






6185 


051526 


000000 












6186 


051530 


001370 


001 172 


001 


1166 


DT3i: 


.WORD 


6187 


051536 


001 176 


001352 


001 


me 






6188 


051544 


000000 












6189 


051546 


001 162 


001 172 


001 


1366 


DT32: 


.WORD 


6190 


051554 


001370 


001352 


001 


1 116 






6191 


051562 


000000 












6192 


051564 


001 162 


001 172 


001 


1352 


DT33: 


.WORD 


6193 


051572 


001 1 16 


000000 










6194 


051576 


001 162 


001 172 


001 


1366 


DT34: 


.WORD 


61S5 


051604 


001 1G6 


001352 


001 


1 116 






6196 


051612 


000000 












6197 


051614 


001 162 


001 172 


001 


1370 


DT35: 


.WORD 


6198 


051622 


001 170 


001352 


001 


1 116 






6199 


051630 


000000 












6200 


051632 


001370 


001164 


001 


1352 


DT36: 


.WORD 


6201 


051640 


001 1 16 


000000 










6202 


051644 


001 176 


001202 


001 


1366 


DT37: 


.WORD 


6203 


051652 


001370 


001352 


001 


1116 






6204 


051660 


000000 












6205 


051662 


001366 


001370 


001 


1352 


DT40: 


.WORD 


6206 


051670 


001 1 16 


000000 










6207 


051674 


001 164 


001 166 


001 


1352 


DT42: 


.WORD 


6208 


051702 


001 1 16 


000000 










6209 


051706 


001 : 62 


001 164 


001 


1366 


DT44: 


.WORD 


6210 


051714 


001370 


001352 


001 


1 1 16 






621 1 


051722 


000000 












6212 


051724 


001 164 


001170 


001 


1366 


DT45: 


.WORD 


6213 


051732 


001370 


001352 


001 


1116 






6214 


051740 


000000 












6215 


051742 


001 162 


001 164 


001 


1352 


DT46: 


.WORD 


6216 


051750 


001 1 16 


000000 










6217 


051754 


001352 


001116 


000000 


0T50: 


.WORD 


6218 


051762 


001366 


001370 


001352 


DT51 : 


.WORD 


6219 


051770 


001 1 16 


000000 










6220 


051774 


001406 


001402 


001 172 


DT52: 


.WORD 


6221 


052002 


001366 


001370 


001176 






6222 


052010 


001352 


001 116 


000000 






6223 


052016 


001366 


001 164 


001352 


DT57: 


.WORD 


6224 


052024 


001 1 16 


000000 










6225 


052030 


001 164 


001 166 


001352 


DTCJ: 


.WORD 


6226 


052036 


001 1 16 


000000 










6227 


052042 


001370 


001 172 


001352 


DT64: 


.WORD 


6228 


052050 


001 1 16 


000000 










6229 


052054 


001366 


001370 


001352 


DT65: 


.WORD 


6230 


052062 


001116 


000000 










6231 


052066 


001364 


001370 


001352 


DT66: 


.WORD 
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SREGS , TESTNO , SERRPC . 

$REG2, SREGI , TESTNO, SERRPC. 

$REG2 , STMPO , TESTNO , SERRPC , 

WASSRO , $REG3 , $REG2 , STMPO , TESTNO , SERRPC . 

WASSR2 , $REG4 , $REG2 , STMPO , TESTNO . SERRPC . 

SREGO , $REG4 , WASSRO , WASSR2 , TESTNO , SERRPC . 

SREGO , $REG4 .TESTNO , SERRPC , 

SREGO , $REG4 , WASSRO , $REG2 , TESTNO , SERRPC . 

SREGO , $REG4 , WASSR2 , $REG3 , TESTNO , SERRPC. 

WASSR2, SREGI .TESTNO, SERRPC. 

STMPO , $TMP2 , WASSRO . WASSR2 , TESTNO , SERRPC . 

WASSRO, WASSR2, TESTNO. SERRPC. 

SREGI , $REG2 , TESTNO , SERRPC . 

SREGO , SREGI , WASSRO , WASSR2 , TESTNO , SERRPC . 

SREGI , $REG3 , WASSRO , WASSR2 .TESTNO , SERRPC . 

SREGO, SREGI , TESTNO, SERRPC, 

TESTNO, SERRPC, 

WASSRO, WASSR2. TESTNO. SERRPC. 

PBALO , V I RT 1 . $REG4 . WASSRO , WASSR2 . STMPO . TESTNO . SERRPC .0 

WASSRO , SREGI . TESTNO . SERRPC , 
SREGI , SREG2 .TESTNO . SERRPC . 
WASSR2 . $REG4 . TESTNO . SERRPC , 
WASSRO , WASSR2 . TESTNO . SERRPC . 
C0RSR2 . WASSR2 . TESTNO . SERRPC . 



SEO 0127 
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sio 01 as 



6232 


052074 


001 1 16 


000000 










JESTNO.SERRPC.O 


6233 


0521 00 


001362 


001366 


001352 


DT67S 


.WORD 


CORSRO.WASSRO, 


6234 


0521 06 


001 1 16 


000000 












6235 


















6236 


0521 1 2 


000 


000 


000 


DF1 : 


.BYTE 


0,0,0,0,0 




6237 


0521 1 5 


000 


000 








0,0,0,0,0.0,0 




6238 


0521 1 7 


000 


000 


000 


DF2! 


.BYTE 




6239 


0521 22 


000 


000 


000 










6240 


0521 25 


000 














6241 


0521 26 


000 


000 


000 


DF3: 


.BYTE 


0,0,0,0 




6242 


0521 31 


000 








.BYTE 






6243 


0521 32 


000 


000 


000 


DF7: 


0,0.0 




6244 


0521 35 


000 


000 


001 


DFIO: 


.BYTE 


0,0,1 ,0,0 




6245 


0521 40 


'■•00 


000 












6246 


052142 


000 


000 


002 


DFIi: 


.BYTE 


0,0,2,0,0 




6247 


0521 45 


000 


000 












6248 


0521 47 


000 


000 


000 


DF12: 


.BYTE 


0,0,0,2.0,0 




6249 


0521 52 


002 


000 


000 










6250 


0521 55 


000 


000 


000 


DF13! 


.BYTE 


0,0,0 




6251 


052160 


000 


000 


000 


DF16: 


.BYTE 


0,0,0,0,0.0 




6252 


0521 63 


uOu 


000 


000 










6253 


0521 66 


003 


000 


000 


DF17: 


.BYTE 


3,0,0,0,0 




6254 


0521 71 


000 


000 












6255 


0521 73 


003 


000 


000 


DF20: 


.BYTE 


.1,0,0,0,0,0,0, 


>o 


6256 


0521 76 


000 


000 


000 










6257 


052201 


000 


000 












6258 


052203 


000 


000 


000 


DF21 : 


.BYTE 


0,0.0,0 




6259 


052206 


000 














6260 


052207 


000 


000 


000 


DF22: 


.BYTE 


0,0,0,0,0 




6261 


052212 


000 


000 












6262 


0522 1 4 


000 


000 


000 


DF23: 


.BYTE 


0,0.0 




6263 


052217 


000 


000 


000 


DF24: 


.BYTE 


0,0.0,0 




6264 


052222 


000 










0,0,0,0,0,0 




6265 


052223 


000 


000 


000 


DF30! 


.BYTE 




6266 


052226 


000 


000 


000 










6267 


052231 


000 


000 


000 


DF46: 


.BYTE 


0,0,0,0 




6268 


052234 


000 














6269 


052235 


000 


000 




DF50: 


.BYTE 


0.0 




6270 


052237 


000 


000 


000 


DF5i: 


.BYTE 


0,0,0,0 




6271 


052242 


000 










3,0,0,0.0.0,0, 




6272 


052243 


003 


000 


000 


DF5a: 


.BYTE 


>o 


6273 


052246 


000 


000 


000 










6274 


052251 


000 


000 












6275 


052253 


000 


000 


000 


DF57: 


.BYTE 


0,0,0,0 




6276 


052256 


000 














6277 


052257 


000 


000 


000 


DF60: 


.BYTE 


0,0,0,0 




6278 


052262 


000 










0.0.0,0 




6279 


052263 


000 


000 


000 


0F6i: 


.BYTE 




6280 


052266 


000 














6281 












.END 






6282 




000001 













CFKTHBO 


PDP 11/34 


MEM MGNT DIAG 


MACY11 


CFKTHB.P11 27-^ 


aUN-78 09:27 




ABASE = 


000000 


815 


856 


ACDW1 = 


000000 


815 


858 


ACDW2 = 


000000 


815 


859 


ACPUOP* 


000000 


815 


830 


ADDWO = 


000000 


815 


860 


ADDW1 = 


000000 


815 


861 


ADDW10= 


000000 


815 


870 


ADDW1 1 « 


000000 


815 


871 


ADDW12= 


000000 


815 


872 


ADDW13= 


000000 


815 


873 


ADDW14= 


000000 


815 


874 


ADDW15X 


000000 


815 


875 


ADDW2 = 


000000 


815 


862 


ADDW3 X 


000000 


815 


863 


ADDW4 = 


000000 


815 


864 


ADDW5 = 


000000 


815 


865 


ADDW6 = 


000000 


815 


866 


ADDW7 « 


000000 


815 


867 


ADDW8 = 


000000 


815 


868 


ADDW9 = 


000000 


815 


869 


ADEVCTs 


000000 


815 


821 


ADEVM = 


000000 


815 


857 


AENV = 


000000 


815 


826 


AENVM a 


000000 


815 


827 


AFAFAL" 


000000 


815 


818 


AMADR1 = 


000000 


815 


843 


AMADR2= 


000000 


815 


847 


AiVIADR3 = 


000000 


815 


850 


AMADR4= 


000000 


815 


853 


AMAMSI = 


000000 


815 


837 


AMAMS2= 


000000 


815 


845 


AMAMS3= 


000000 


815 


848 


AVIAMS4 = 


000000 


815 


851 


AMS3AD= 


000000 


815 


823 


AMSGLG= 


000000 


815 


824 


AMSGTY- 


000000 


815 


817 


AMTYP1 = 


000000 


815 


838 


AMTYP2= 


000000 


815 


846 


AMTyP3= 


000000 


815 


849 


AMTYP4a 


000000 


815 


852 


ANDADR 


001374 


890# 


1580* 


APASS = 


000000 


815 


820 


APRIORs 


000000 


815 




APTCSU* 


000040 


4992 


5097# 


APTENVs 


000001 


4457 


4985 


APTSIZ» 


000200 


1398 


5094# 


APTSPOx 


000100 


4987 


5055 


ASWREG= 


000000 


815 


828 


ATESTN= 


000000 


815 


819 


AUNIT » 


000000 


815 


822 


AUSWR » 


000000 


815 


829 


AVECT1» 


000000 


815 


854 


AVECT2S 


000000 


815 


855 


BITO n 


000001 


628iy 




BITOO a 


000001 


61 8# 


628 


BIT01 » 


000002 


617# 


627 
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SEQ 0129 



1602« 1620« 1642* 1660* 1682* 1700« 1722* 1740« 1762« 81 S6 



5053 5095# 
509e# 



C FKTHBO 


PDP 1 1 /34 MEM 


MGNT DIAG 


MACYl 1 


30A(1052) 


27-UUN 


-78 09:33 PA( 


CFKTHB . 


PI 1 27~JUN-' 


78 09:27 




CROSS REFERENCE 


TABLE 


USER i 


BITP2 = 


000004 


61 6# 


626 












0000 1 


515^ 


625 










i T04 = 


000020 


61 4(y 


624 










BIT 05 = 


000040 


61 3# 


623 










B I TOG = 


0001 00 


61 2iy 


622 












000200 


61 1 # 


621 










BIT08 - 


000400 


61 Oi^ 


620 


4385 








BIT09 - 


001 000 


609# 


61 9 


4393 


4468 






B I T 1 a 


000002 


627# 














002000 


60B^ 


4445 










B I T 1 1 a 


004000 


607# 


4400 












U 1 U w uu 


606/y 


4340 










BI T 1 3 = 


UiCUUUU 


605# 


4452 










Bl T 1 4 » 


040000 


604# 


4371 










B I T 1 5 » 


1 00000 


603/V 


1 799 










RT - 


AAAA A4 


626#y 














U ^UU 1 W 


625ff 












Bl T4 a 




624iy 


702 










BITS « 


000040 


623# 
















622# 


703 










B I T7 = 


000200 


621 # 












BITS = 


000400 


620# 


2207 


2209 


2260 


2278 


2344 






2566 


2592 










BI T9 


n A 1 AAA 
w U 1 U V u 


61 9*^ 












OPT VEC» 


0000 1 4 


635# 












CKSWR » 


1 044 1 


4370 


4434 


4467 


5390* 






CMPREG 


0361 62 


2078 


2087 


2096 


2105 


4649# 




CMSG 




4942 


4953'f 










CNTRLC 


037460 


4788 


4876 


4940# 








COR3R0 




SQSif 


3480* 


6233 








CDRSR2 


001 364 


BBBM 


3468* 


6231 








CR = 


0000 1 5 


543«y 


5031 


5041 








CRLF s 


000200 


544^ 


1422 


5002 


5041 


5846 


5857 






6060 


6062 


6067 


6072 


6083 


6101 


DDISP « 


1 77570 


550# 


782 


1386 








DF 1 


052 1 1 2 


91 7 


62364' 










DF 1 


052 1 35 


960 


6244# 












ARD1 


967 


1 1 99 


624611' 








nFi 




974 


993 


6248* 








DF1 3 


0521 55 


980 


986 


625011' 








DF16 


ACT 4 CA 
U 3 < 1 Ow 


1 000 


6251# 










DF 1 7 




1 007 


6253# 










DF2 


052 1 1 7 


923 


1 235 


623B# 








DF20 


0521 73 


1014 


6255# 










DF21 


052203 


1021 


6258(1' 










DF22 


052207 


1 028 


6260# 










DF23 


052214 


1034 


1 130 


6262# 








DF24 


052217 


1040 


1046 


1052 


1058 


1082 


1099 


DF3 


052126 


929 


935 


941 


947 


1229 


624111' 


DF3a 


052223 


1064 


1070 


1w/6 


1088 


1093 


1106 


DF46 


052231 


1 154 


1161 


1186 


6267* 






DF50 


052235 


1167 


1 192 


1205 


1223 


6269# 




DF51 


052237 


1173 


6270# 










DF52 


052243 


1 180 


6272# 










DF57 


052253 


1211 


6275* 










DF60 


052257 


1217 


6277# 











SEO 0130 



6047 
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SEO 0131 



DF61 


052263 


1247 


1253 


1260 


DF7 


052132 


953 


6243* 




DH1 


045620 


915 


5819* 




DH10 


046050 


957 


5846* 




DH1 1 


046150 


964 


1196 


5857* 


DH12 


046270 


971 


990 


5871* 


DH13 


046430 


978 


984 


5888* 


DH16 


046460 


997 


5892* 




DH17 


046560 


1004 


5903* 




DH2 


045670 


921 


1233 


5826* 


DH20 


046650 


101 1 


5913* 




DH21 


046776 


1018 


5928* 




DH22 


047056 


1025 


5937* 




DH23 


047155 


1032 


1128 


5948* 


DH24 


047205 


1038 


1044 


5953* 


DH26 


047245 


1050 


1056 


5959* 


DH3 


045760 


927 


933 


939 


DH30 


047305 


1062 


5965* 




DH31 


047365 


1068 


5974* 




DH32 


047445 


1074 


5983* 




DH33 


047525 


1080 


5992* 




DH34 


047565 


1086 


5998* 




DH35 


047645 


1091 


6007* 




DH36 


047725 


1097 


1116 


1239 


DH37 


047765 


1 103 


6022* 




DH40 


050102 


1110 


6035* 




DH42 


050142 


1 122 


6041* 




DH44 


050202 


1 134 


6047* 




DH45 


050314 


1 141 


6060* 




DH4S 


05051 1 


1 151 


1158 


1' 13 


DH50 


050566 


1 165 


1 190 


1203 


DH51 


050606 


1171 


6095* 




DH52 


050646 


1 177 


6101* 




DH57 


050764 


1209 


61 15* 




DH60 


051024 


1215 


6121* 




DH61 


051064 


1245 


1251 


1258 


DH62 


051 1 22 


1271 


6132* 




DH63 


051 161 


1277 


6138* 




DH7 


046020 


951 


5842* 




OISPLA 


001 142 


782# 


1386* 


1394* 


DISPRE 


000174 


718# 


1394 




DSWR « 


177570 


549# 


781 


1385 


DTI 


051220 


916 


6147* 




DT10 


051276 


959 


6156* 




DTI 1 


051312 


966 


1198 


6158* 


DTI 2 


051326 


973 


992 


6160* 


DTI 3 


051344 


979 


985 


6163* 


DT16 


051354 


999 


6165* 




DT17 


051372 


1006 


6168* 




DT2 


051234 


922 


1234 


6149* 


DT20 


051406 


1013 


6170* 




DT21 


051430 


1020 


6173' 




DT22 


051442 


1027 


6175* 




DT23 


051456 


1033 


1129 


6177* 


DT24 


051466 


1039 


1045 


6179* 


DT26 


051500 


1051 


1057 


6181* 



5836* 



6083* 
1221 



4415* 4444* 



CFKTHBO 


PDP 1 1/34 MEM 


MGNT DIAQ 


MACY11 


CFKTHB. 


P11 27-JUN- 


78 09:27 




DT3 


051254 


928 


934 


DT30 


05151 2 


1063 


6183* 


oral 


051530 


1069 


6186* 


DT32 


051546 


1075 


6189* 


DT33 


051564 


1081 


6192* 


DT34 


051576 


1087 


6194* 


DT35 


051614 


1092 


6197* 


DT36 


051632 


1098 


1117 


DT37 


051644 


1 1 05 


6202* 


Dr40 


051662 


1111 


6205* 


DT42 


051674 


1 123 


6207* 


DT44 


051706 


1 136 


6209* 


DT45 


051724 


1 146 


621 2* 


Dr46 


051742 


1 153 


1 160 


DT50 


051754 


1 166 


1191 


DT51 


051762 


1 172 


621 8* 


Dr52 


051774 


1 179 


6220* 


DT57 


052016 


1210 


6223* 


□ reo 


052030 


1216 


6225* 


DT6-1 


052042 


1240 


6227* 


DT65 


052054 


1246 


1 252 


ores 


052066 


1272 


6231 * 


DT6y 


052100 


1 278 


6233* 


DT7 


051266 


952 


6154* 


EMTVEC« 


000030 


638* 


1355* 


EMI 


041616 


914 


5449* 


EMIO 


0421 75 


956 


5494* 


EMI 1 


042241 


963 


5501* 


EMU 


042301 


970 


5507* 


EM13 


042350 


977 


551 4* 


EM14 


042405 


983 


5519* 


EM15 


042440 


989 


5524* 


EM16 


042514 


995 


5532* 


EM17 


042556 


1003 


5538* 


EM2 


041656 


920 


5455* 


EM20 


042626 


1010 


5545* 


EM21 


042700 


1017 


5552* 


£.^22 


042735 


1024 


5557* 


EM23 


042774 


1031 


5563* 


EM24 


043040 


1037 


5569* 


EM25 


0431 00 


1043 


5575* 


EM26 


043145 


1049 


5582* 


EIV127 


043215 


1055 


5589* 


EM3 


041725 


926 


5462* 


EM30 


043264 


1061 


5596* 


EM31 


043336 


1067 


1 090 


EM32 


043403 


1073 


561 0* 


EM33 


043464 


1 079 


561 9* 


EM34 


043547 


1085 


5628* 


EM37 


043625 


1102 


5636* 


EM4 


041764 


932 


5468* 


EM40 


043672 


1 109 


5643* 


EM41 


043741 


1115 


565C* 


EM42 


043774 


1121 


5655* 


EM43 


044033 


1127 


5661* 


EM44 


044100 


1133 


5668* 
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SEO 0132 



1185 
1204 



6215* 
1222 



CFKTHBO 


PDP 11> 


CFKTHB. 1 


P1 1 : 


EM45 


044146 


EM46 


044223 


EM47 


044266 


EMS 


042017 


EM50 


044331 


EM51 


044367 


EM52 


044445 


EM53 


044523 


EM54 


044566 


EM55 


044624 


EM56 


044662 


EM57 


044716 


EM6 


042072 


EM60 


044773 


EM61 


045036 


EM62 


0451 14 


EM63 


045165 


EM64 


045225 


EM6S 


045266 


EM66 


045351 


EM67 


045441 


EM7 


042137 


EM70 


045506 


EW71 


045562 


ERRTYP 


035556 


ERRVEC= 


000004 


FORMPA 


036354 


GNS * 


****** 


GTSWR = 


104407 


NT 


00001 1 


IOTVEC= 


000020 


HERSTKa 


001 100 


KIPARO= 


172340 


KIPAR1 a 


172342 


KIPAR2= 


172344 


KIPAR3= 


172346 


KIPAR4= 


172350 


HIPAR5= 


172352 


KIPAR6= 


172354 


K1PAR7= 


172356 


KIPDROa 


172300 


KIPDR1 « 


172302 


KIPDR2= 


172304 


KIPDR3= 


172306 


KIPDR4= 


172310 


KIPDR5= 


172312 


KIPDR6= 


172314 


KIPDR7- 


172316 


LF 


000012 



27-JUN-78 09:27 

1 140 
1 150 
1157 
938 
1 164 
1 170 
1 176 
1 182 
1 189 
1195 
1202 
1208 
944 
1214 
1220 
1226 
1232 
1244 
1250 
1257 
1264 
950 
1270 
1276 
4454 

631* 
2353 

U 717 
5392 
1416 
541* 
636* 
704* 
3159 
3753 
691* 
692* 
693* 
694* 
695* 
2692* 
696* 
697* 
698* 
680* 
4622 
681* 
682* 
68311' 
684* 
3619* 
3985* 
B85* 
686* 
687* 
542* 
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5675* 
5683* 
5689* 
5473* 
5695* 
5701* 
5709* 
5717* 
5723* 
5728* 
5733* 
5738(1 
5481* 
5746* 
5752* 
5760* 
5767* 
5773* 
5779* 
5788* 
5798* 
5488* 
5805* 
5813* 



4500* 
























1383 


1384* 


1399* 


1426* 


1427* 


2890* 


2900* 


4376 


4377* 


4379* 


4382* 




2379 


2405 


2432 


2455 


2497 


2523 


2549 


2575 


2601 


2672 


2713 


4725* 


1421 


4309 


4316 


5381 


5382 


5383 


5384 


5385 


5386 


5388 


5390 


5391 


5393 


5394 






















4949 


5388* 






















5000 


5041 






















1353* 


1354* 






















1537 


1541 


1543 


2075 


2084 


2093 


2102 


2216 


2892 


3070 


3142 


3146 


3217 


3221 


3234 


3302 


3364 


3369 


3431 


3460 


3519 


3538 


3598 


3659 


4085 


4217 






















1618 


1877 


1971 


2083 


2136 


2324 


3717* 


4626 


4664 


4723 






3718* 
























3719* 
























2251* 


2748 


2928* 


3289* 


3720* 
















2252* 


2342* 


2368* 


2394* 


2421* 


2445* 


2486* 


2512* 


2538* 


2564* 


3590* 


2642* 


2699* 


2929* 


3290* 


3587* 


3721* 


3741* 


3893* 


4071* 










2643* 


2693* 


2700* 


3339* 


















2253* 


3722* 






















1658 


1924 


2019 


2074 


2125 


2197 


2205* 


2331 


2752 


2756 


2770 


3726 


4650 
























2254* 


2272* 


2889* 


2893 


2932* 


3135* 


3291* 












2255* 


2t;i0* 


2697* 


2939* 


3006* 


3140* 


3215* 


3292* 


3317* 


3340* 


3497* 


3589* 


3740* 


3746* 


3891* 


3917* 


3919* 


3934* 


3936* 


3949* 


3951* 


3965* 


3967* 


3983* 


4000* 


4002* 


4019* 


4021* 


4070* 
















2691* 


2698* 


3136* 


3341* 


3420* 


3498* 















2256* 
5035 



2878* 
5041 
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CFKTHB. 


P11 27-UUN-78 


09:27 




CROSS 1 


REFERENCE 


TABLE — 


USER ! 


SYMBOLS 












SEO 


LOOP 


020466 


1424# 


4351 
























MGMERR 


002400 


1319# 


1428 


2218 


2271 


2703 


2966 


3047 


3089 


3195 


3270 


3318 


3499 


3618 






3692 


3859 


4030 


4186 




















MGMFLG 


002402 


1320H' 


1334* 


1432* 






















VIMVEC = 


000250 


647* 


1428* 


1429* 


2201* 


2202* 


2218* 


2219* 


2257* 


2271* 


2662* 


2703* 


2938* 


2986« 






3005* 


3047* 


3062* 


3089* 


3139* 


3152* 


3195* 


3214* 


3227* 


3270* 


3295* 


3318* 


3381 * 






3367* 


3419* 


3451* 


3499* 


3745* 


3859* 


3895* 


4030* 


4078* 


4186* 








ORADR 


001376 


891* 


1581* 


1600* 


1621* 


1640* 


1661* 


1680* 


1701* 


1720* 


1741* 


1760* 


6156 




PBAHI 


001410 


89Bff 


4744* 
























PBALD 


001406 


B95# 


4735* 


4736* 


4741* 


6168 


6170 


6220 














PIRQ a 


177772 


5A8ft 


























PIRQVEa 


000240 


642(S' 


























PRO 


000000 


565# 


























PRl = 


000040 


566lt 


























PR2 = 


000100 


567# 


























PR3 


000140 


568i;^ 


























PR4 X 


000200 


569ft 


























PR5 = 


000240 


570f/ 


























PR6 


000300 


571iC 


























PR7 


000340 


572(( 


























PS 


177776 


545# 


546 
























PSW 


177776 


546* 


1472* 


1473* 


1474 


1478* 


I486* 


1498* 


1500* 


1501 


1506* 


1512* 


1514* 


1515 






1519* 


1536* 


1538* 


1540* 


1836* 


1846* 


2417 


2441 


2639* 


2663 


2684 


2694* 


2696* 






2812* 


2860* 


2943 


2976* 


2982* 


2984* 


3010 


3043* 


3045* 


3063* 


3518* 


3523* 


3530 






3532* 


3537* 


3540* 


3542* 


3558« 


3562 


3564* 


3649* 


3658* 


3660* 


3662* 


3750* 


3771* 






3783* 


3795* 


3806* 


3820* 


3834* 


3847* 


3898* 


3909* 


3930* 


3946* 


3961* 


3978* 


3996K 






4013* 


4069* 


4080* 


4099* 


4112* 


4124* 


4135* 


4148* 


4162* 


4175* 


4187* 


4214* 


4257* 






4584 


4586 


4726 






















PWRMSG 


041554 


5430 


5439* 
























PWRVEC= 


000024 


637* 


1359* 


ICGO* 


5399* 


5400* 


5409* 


5415* 


5427* 


5428* 










RDCHR = 


10441 1 


4869 


5391* 
























RDLIN » 


104412 


5392* 


























RESREGx 


104414 


5337 


5394* 
























RESVEC» 


000010 


632* 


1370* 


1377* 






















SAVREG" 


104413 


5322 


5393* 
























SETREG 


036070 


2076 


2085 


2094 


2103 


2123 


4621* 
















SRO » 


177572 


651* 


1330 


1332* 


1434* 


1578 


1780 


1837* 


1839 


1845* 


2207* 


2209 


2211* 


2217* 






2260* 


2278* 


2279 


2284* 


2344* 


2370* 


2396* 


2423* 


2446* 


2488* 


2514* 


2540* 


2566* 






2592* 


2660* 


2714 


2716* 


2879 


2880* 


2957 


2972* 


3024 


3039* 


3072 


3088* 


3160 






3176* 


3183 


3185* 


3235 


3251* 


3258 


3260* 


3310* 


3365 


3370 


3386 


3400* 


3425 






3432 


3435 


3445 


3454 


3467 


3475 


3479 


3486* 


3600 


3616* 


3655 


3657* 


3866 






3868* 


4036 


4038* 


4194 


4196* 


















SRI a 


177574 


652* 


1858 
























SR2 


177576 


653* 


1331 


1790 


181 1 


2280 


2715 


2958 


3025 


3081 


3161 


3184 


3236 


3259 






3303 


3343 


3352 


3366 


3371 


3390 


3401 


3426 


3436 


3441 


3446 


3455 


3461 






3487 


3601 


3656 


3867 


4037 


4195 
















SR3 


172516 


654* 


























STACK = 


001 100 


536* 


704 


705 


1351 


1425 


4258 


4277 














START 


020000 


721 


1344* 


5432 






















STKLMT* 


177774 


547* 


























SWR 


001 140 


781* 


1349 


1385* 


1387 


1393* 


1400* 


1414 


4340 


4371 


4385 


4387 


4393 


4400 






4445 


4452 


4464 


4468 


4757 


4802* 


5407 


5420* 












SWREG 


000176 


719* 


1393 


1414 


4757 


4770 


















SWO 


000001 


600* 


























SWOO s 


000001 


590* 


600 
























SW01 « 


000002 


569* 


599 
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SWO 2 = 

SW03 » 

SW04 = 

SW05 = 

SW06 * 

SW07 « 

SWOB = 

SWO 9 « 

SW1 » 

SW10 ' 

SW1 1 = 

SW12 = 

SW13 = 

SW14 s 

SW15 > 
SW2 
SW3 
SW4 
SW5 
SW6 

SW7 = 

SW8 

SW9 

TBIT = 
TBITPS 
TBITVE= 
TESTNO 



000004 
000010 
000020 
000040 
000100 
000200 
000400 
001000 
000002 
002000 
004000 
010000 
020000 
040000 
100000 
000004 
000010 
000020 
000040 
000100 
000200 
000400 
001000 
000020 
001372 
000014 
001352 



TIMERR 

TIMFLG 

TKVEC = 

TOFF 

TON 

TONUM 

TPVEC = 
TRAPPC 



002332 
002334 
000060 
036002 
036036 
001400 

000064 
001356 



TRAPPS 001360 



TRAPVE = 

TRTVEC= 

TST1 

TST10 

TST1 1 

TST12 

TST13 

TST14 

TST15 

TST16 

TST17 

TST2 

TST20 

TST21 



000034 
000014 
020550 
021514 
021646 
022000 
022142 
022200 
022216 
022340 
022462 
020622 
022612 
022742 



588* 
587* 
586* 
585* 
584* 
583* 
582* 
581* 
599* 
580* 
579* 
578* 
577* 
576* 
575* 
596* 
597* 
596* 
595* 
594* 
593* 
592* 
591* 
702* 
889* 
633* 
881* 
6173 
6205 
6233 
1292* 
1293* 
640* 
2196 
2221 

B92* 
1742* 
641* 
883* 
3864* 
884* 
3865* 
639* 
634* 
1445* 
1672 
1712 
1752 
1834* 
1856* 
1859 
1922* 
1969* 
1469* 
2017* 
2070* 



598 
597 
596 
595 
594 
593 
592 
591 



4584 

1433* 

1367* 

4441* 

6175 

6207 

1426 
1304-^ 

2249 
2274 
1582* 
1748 

1300* 

3874 

1301* 

3873 

1357* 



1694* 
1734* 
1778* 



4589 

4587* 

1368* 

6147 

6177 

6209 

1591 
1431* 

2746 
2792 
1588 
1763* 

1306 

4034* 

1305 

4035* 

1358* 



4602 
4602 

6149 
6179 
6212 



6152 


6154 


6156 


6158 


6160 


6163 


6165 


6168 


6170 


6181 


6183 


6186 


6189 


6192 


6194 


6197 


6200 


6202 


6215 


6217 


6218 


6220 


6223 


6225 


6227 


6229 


6231 


1671 


1711 


1751 


2900 


3543 


3617 


3690 







2813 


2875 


3516 


3639 


4584* 






2859 


2902 


3545 


3695 


4602* 






1603* 


1622* 


1628 


1643* 


1662* 


1668 


1683* 


6156 














1327* 


1336 


2282* 


2290 


2707* 


2723 


3181* 


4044 


4192* 


4202 


6147 


6149 






1328* 


1335 


2283* 


2289 


2708* 


2722 


3182* 


4043 


4193* 


4201 


6147 


6149 







3256* 3266 



« 
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TST22 


023162 


212O1!' 




TST23 


023332 






TST24 


023466 


2248# 




TST25 


023724 


2275 


2322# 


T3T26 


024454 


2477# 




TST27 


0251 40 


2637# 




TST3 


020706 


1496^ 




TST30 


025604 


2705 


2744# 


TST31 


026000 


281 1« 




TST32 


026206 


2B73# 




TST33 


026336 


2925# 




TST34 


026632 


2998A' 




TST35 


027042 


3060# 




TST36 


0271 66 


3134<y 




TST37 


027470 


321 1* 




TST4 


021 030 


1535# 




TST40 


027756 


3288# 




TST41 


0301 44 


3338# 




TST42 


031 1 22 


35l5iy 




TST43 


031310 


35540' 




TST44 


031 372 


3586/y 




TST45 


031 570 


3638# 




TST46 


0321 1 2 


3716# 




TST47 


032760 


3861 


3890# 


TSTS 


021 076 


1542 


1574# 


TST50 


033640 


4031 


4061 # 


TST51 


034404 


4189 


421 3# 


TST52 


03451 


4256/y 




TST6 


021230 


1592 


1614# 


TST7 


021362 


1632 


1654# 


TYPBN a 


1 04406 


4549 


5386# 


TYPDS a 


1 04405 


4313 


4320 


TYPE = 


1 04401 


1408 


4307 






4568 


4768 






4902 


4903 


TYPOC = 


1 04402 


4509 


4535 


TYPON = 


1 04404 


5384jy 




TYPOS a 


1 04403 


5383# 




UI PAROa 


1 77640 


669iy 


1698 


UI PARI 3 


1 77642 


670# 


3734* 


UI PAR2 = 


1 77644 


671/C 


3735* 


UI PAR33 


1 77646 


672# 


2815 


UI PAR4s 


1 77650 


673# 


2658* 


UI PAR5= 


1 77652 


674/y 


2659* 


UI PAR6x 


1 77654 


675# 




UI PAR7s 


1 77656 


676# 


1905 


UI PDROs 


1 77600 


658# 


1738 






4678 




UIPDR1 = 


177602 


659# 




UIPDR2= 


177604 


660«' 




UIPDR3= 


177606 


661 # 


2933* 


UIPDR4= 


177610 


662# 


2656* 


UIPDR5= 


177612 


663# 


2657* 


UIPDR6" 


177614 


664# 




UIPDR7» 


177616 


6650 


1952 


USESTK« 


000700 


7050 


1539 
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4542 
4314 
4769 
4905 
4771 


4948 
4321 
4772 
4908 
4945 


5385# 

4447 

4783 

4912 

53e2# 


4455 
4793 
4942 


4501 
4804 
4946 


4518 
4823 
5005 


4520 
4873 
5114 


4523 
4882 
5182 


4525 
4888 
5257 


4557 
4893 

538141' 


4562 
4897 
5429 


1907 


2001 


2101 


2159 


2644 


3520* 


3539* 


3733* 


4634 


4692 


4728 


2930* 
2686* 
2687* 


3640* 
2701* 
2702* 


3736* 
2931* 


3641* 


3742* 


3894* 


4072* 










1999 
1954 


3737* 
2049 


2092 


2147 


2651 


2819 


2823 


2837 


3730 


4065 


4630 


3642* 
2688* 
2689* 


3693* 
2940* 


3007* 


3643* 


3892* 


407&* 












2047 
3524 


3S41 


3661 


3756 


3910 


4082 


4220 


4243 









CFKTHB. PI 1 



VIRT2 
WASR6 



001404 
001354 



WASSRO 001366 



WASSR2 001370 



W8IT = 

SAPTHD 

$ASTAT« 

$ATYC 

$ATY1 

$ATY3 

$ATY4 

SAUTOB 

$3ASE 

$3DADR 

SBDDAT 

SBELL 

$B1N 

$CDW1 

$CDW2 

$CHARC 

$CKSWR 

SCLR.T 

SCMTAG 

$CMt » 

$CM2 a 

$CM3 = 

fCM4 a 

$CNTLC 

SCNTLG 

SCNTLU 

$CPUOP 

SCRLF 

$DBLK 

$DB20 

$ODWO 

$DDW1 

SDDWIO 

SDDWI 1 

$DDW12 

$DDW13 

$DDW14 

$DDW15 

$0DW2 

$0DW3 

$DDW4 

$DDW5 

$DDW6 



000100 
000204 

0401 16 
040072 
040100 
0401 10 
0011 34 
001302 
001 1 22 
001126 
001216 
040412 
001306 
001310 
040066 
036466 
034750 
001 100 
000006 
000014 
000006 
000006 
037416 
037430 
037423 
001254 
001223 
041056 
041 162 
001312 
001314 
001336 
001340 
001342 
001344 
001346 
001350 
001316 
001320 
001322 
001324 
001326 
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2 893« 
2712* 
894# 
882ii' 
887# 
3235* 
3600* 
6209 

888« 
3082 
3371* 
3488 
6202 
703* 
741 
5075 
5046 
5044# 
4990 
4460 
778* 
656/ir 
773# 
775* 
807* 
5110* 
858* 
859* 
5007* 
4757* 
4326 
761* 
793* 
793* 
791* 
799* 
4783 
4768 
4793 
830* 
809* 
5223 
4554 
860* 
861* 
870* 
871* 
872* 
873* 
874* 
875* 
862* 
863* 
864* 
865* 
866* 



2352* 

4729 

2670* 

1302* 

1330* 

3238 

3603 

6212 

1331* 

3161* 

3375 

3601* 

6205 

2762 

747* 
5090 
5048# 

5045* 
5047# 
1418* 



4447 
5113* 



5017* 
5390 
4329* 
1346 
794# 
794* 
793 
800* 
4873 
4924* 
4897 

4321 
5257 
5322# 



CROSS 1 


REFERENCE 


TABLE — 


USER : 


SYMBOLS 












SEO 


2378* 


2404* 


2431* 


2454* 


2496* 


2522* 


2548* 


2574* 


2600* 


2671* 


2679 


4735 


6168 


6170 


6220 
















6170 






















1329* 


2281* 


6147 


6149 
















2279* 


2714* 


2957* 


2959 


3024* 


3026 


3072* 


3074 


3160* 


3163 


3183* 


3258* 


3370* 


3372 


3386* 


3387 


3425* 


3435* 


3445* 


3454* 


3467* 


3479* 


3655* 


3674 


3866* 


4036* 


4194* 


6149 


6183 


6189 


6194 


6202 


6205 


6218 


6220 


6223 


6229 


6233 














1790* 


1792 


1811* 


1812 


2280* 


2715* 


2958* 


2966 


3025* 


3033 


3081* 


3170 


3184* 


3236* 


3245 


3259* 


3303* 


3304 


3343* 


3345 


3352* 


3354 


3390* 


3391 


3401* 


3403 


3426* 


3436* 


3446* 


3455* 


3461* 


3462 


3487* 


3607 


3656* 


3677 


3867* 


4037* 


4195* 


6149 


6186 


6189 


6197 


6200 


6209 


6212 


6218 


6220 


6227 


6229 


6231 










2771 


2782 


2829 


2838 


2849 















4480 
5114 



1347 1355 1361 1362 

795* 796* 797* 798* 

795* 796* 797* 798* 

801* 802* 803* 804* 
4922* 



4455 
5265* 



1363 
799* 
799* 



4922 



5006 
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$DDW7 


001330 


867# 


























$DDW8 


001332 


86B# 


























$DDW9 


001 334 


86,91* 


























SDEVCT 


001236 


821# 


























SDEVM 


001304 


857# 


























$DOAGN 


034770 


4303 


4324 


4331 


4337# 




















$DTBL 


041046 


5226 


5261# 
























$ENDAD 


034760 


728 


1406 


4333# 


4475 




















SENDCT 


034606 


1361 


4305# 
























SENULL 


035034 


4353# 


























$ENV 


001246 


826# 


1412 


4457 


4985 


5053 


5077 
















$ENVM 


001247 


827# 


1398 


4987 


4992 


5055 


















$EOP 


034552 


4295* 


4950 
























SEOPCT 


034600 


1361* 


4302* 


4306 






















$ERFLG 


001 1 03 


764# 


4360 


4389 


4391 


4397* 


4419 


4442* 


4480 












$ERMAX 


001 1 15 




1364* 


4391 


4414* 


4419 


















$ ERROR 


035320 


1355 


4433* 
























SERHPC 


001 1 16 


771if 


4449* 


4450* 


4451 


4480 


4507 


6147 


6149 


6152 


6154 


6156 


6158 


6160 






6163 


6165 


6168 


6170 


6173 


6175 


6177 


6179 


6181 


6183 


6186 


6169 


6192 






6194 


6197 


6200 


6202 


6205 


6207 


6209 


6212 


6215 


6217 


6218 


6220 


6223 






6225 


6227 


6229 


6231 


6233 


















SERRTB 


001412 


91 1# 


451 5 
























SERTTL 


001 1 12 


768# 


4318 


4322* 


4448* 


4480 


















$ESCAP 


001214 


806# 


1363* 


4413* 


4471 


4473 


4480 
















$ETABL 


001246 


Q2SH 


























SETEND 


001352 


753 


878# 
























SFATAL 


001230 


818^ 


5081* 
























$FFLG 


040336 


5044* 


5047* 


5075 


5084* 




















SFILLC 


001 156 


7894' 


5010 


5041 






















SFILLS 


001 155 


788* 


5041 
























SGDADR 


001120 


772* 


























$3DDAT 


001 1 24 


774* 


























$GEr42 


034732 


4323* 


























SGTSWR 


036536 


4769* 


5388 
























$HD s 


000000 


521 


























SHIBTS 


000204 


748* 


























$ICNT 


001 104 


765* 


4404* 


4405 


4407* 


4418 


















SILLUP 


041546 


5399 


5415 


5436* 






















SINTAG 


001135 


779* 


4785 


4805 


4929 




















SITEMB 


001 1 14 


769* 


4451* 


4459 


4480 


4504 


















$LF 


001224 


810* 


4480 


4912 


4922 


5041 


















$LFLG 


040335 


5085* 


5091* 
























SLOOP 


035026 


4345 


4349* 
























SLPADR 


001 106 


766* 


1379* 


4395* 


441 1 * 


4416 


4418 
















SLPERR 


001 1 10 


767* 


1 380* 


1 446* 


1 461 * 


1 470* 


1 485* 


1 497* 


1 51 1 * 


1 524* 


1 576* 


1 587* 


161 6* 


1 627* 






1656* 


1667* 


1696* 


1707* 


1736* 


1747* 


1789* 


1798* 


1822* 


1879* 


1888* 


1909* 


1926* 






1935* 


1956* 


1972* 


1985* 


2003* 


2020* 


2033* 


2051* 


2072* 


2081* 


2090* 


2099* 


2108* 






2206* 


2220* 


2250* 


2273* 


2337* 


2363* 


2389* 


2416* 


2440* 


2463* 


2481* 


2507* 


2533* 






2559* 


2585* 


261 1* 


2661* 


2704* 


2755* 


2791* 


2822* 


2858* 


2877* 


2888* 


2901* 


2941 * 






2985* 


3008* 


3046* 


3061* 


3090* 


3141* 


3145* 


3151* 


3194* 


3216* 


3220* 


3226* 


3269* 






3296* 


3316* 


3342* 


3351* 


3360* 


3421* 


3496* 


3517* 


3544* 


3556* 


3571* 


3592* 


3620* 






3648* 


3694* 


3738* 


3749* 


3769* 


3782* 


3794* 


3805* 


3819* 


3833* 


3846* 


3860* 


3913* 






3929* 


394E* 


3960* 


3977* 


3995* 


4012* 


4029* 


4068* 


4098* 


4111* 


4123« 


4134* 


4147* 






4161* 


4174* 


4188* 


42324' 


4245* 


4395 


4412* 


4418 


4470 










SMADRI 


001260 


843* 


























$MADR2 


001264 


847# 
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SEQ 0139 



$MADR3 

$MADR4 

$MA I L 

$MAMS 1 

$MAMS2 

$.'V!AMS3 

$IVIAMS4 

SMBADR 

SMFLG 

SMNEW 

SMSGAD 

SMSGLG 

SMSGTY 

SMSvyR 

SMTYPI 

$:VITYP2 

$MTYP3 

$MTYP4 

SMXCNT 

$NULL 

$NWTST>« 



SOCNT 

$DCTVL 

SOMODE 

SOVER 

$PASS 

$PASTM 

SPWRAD 

SPWRDN 

$PWRMG 

$PWRUP 

SOUES 

SRDCHR 

$RDDEC= 

SRDLIN 

$RDOCT= 

SRDSZ = 

SREGAD 

SREGO 



001270 
001274 
001226 
001256 
001262 
001266 
001272 
000206 
040334 
037446 
001242 
001244 
001226 
037435 
001257 
001263 
001267 
001273 
035316 
001154 
000001 



040636 
041264 
040640 
035302 
001234 
000212 
041530 
041370 
041524 
041442 
001222 
037010 

037130 

000010 
001 160 
001 162 



$REG1 001164 



$REG2 

$REG3 

$REG4 

$REG5 

SRESRE 

SRTNAD 

$RTRN 

tR2A B 



001 166 
001 170 
001172 
001 174 
041 1 24 
035030 
035024 



850* 
853* 
749 
837* 
845* 
848* 
851* 
749* 
5045* 
4772 
823* 
824* 
817* 
4769 
838* 
846* 
■849* 
852* 
4408 

787* 
1438* 
1648 
1911* 
2237 
2916* 
3326 
4049* 
5154* 
5324 
5149* 
4372 
820* 
751* 
5432* 
1359 
5430* 
5409 

808* 
4836* 
5393 
4864* 
5393 
4857* 
791* 
793* 
6209 

794* 
6225 
795* 
796* 
797* 
798* 
5299* 
4351* 
1367 
5395 



1397 1412 4410 4457 



5051 

4927* 

5061* 

5066* 

5059 

4925* 



4418* 

5012 

1440 

1686* 

1913 

2305* 

2918 

3503* 

4051 

5183* 

5349* 

5153* 

4388 

1397* 



541 5# 

4480 

5391 



4435* 

6215 

4436* 

4437* 
4438* 
4439* 
4440* 
5394 



5086* 

5064 

5067* 



5041 

1463* 

1688 

1960* 

2307 

2989* 

3505 

4205* 

5196* 

5158 
4396 
4299* 



5427 
4823 



5079 5083* 



1465 


1488* 


1490 


1726* 


1728 


1766* 


1962 


2005* 


2007 


2465* 


2467 


2613* 


2991 


3049* 


3051 


3547* 


3549 


3574# 


4207 


4247* 


4249 


5161* 


5172* 


5198# 


4406 


441 5# 




4300* 


4311 


4352 


4905 


4922 


5041 



1526* 


1528 


1564* 


1566 


1606# 


1608 


1646* 


1768 


1824* 


1826 


1848* 


1850 


1865* 


1867 


2053* 


2055 


21 10* 


21 12 


2182* 


2184 


2235* 


2615 


2727* 


2729 


2794* 


2796 


28624' 


2864 


3122* 


3124 


3199# 


3201 


3274# 


3276 


33244' 


3576 


3623* 


3625 


3704* 


3706 


3878# 


3880 



6152 


6154 


6158 


6160 


6163 


6165 


6175 


6189 


6192 


6194 


6197 


6152 


6158 


6160 


6165 


6179 


6200 


6207 


6209 


6212 


6215 


6223 


6160 


6165 


6179 


6181 


6183 


6186 


6194 


6207 


6225 






6, ;3 


6175 


6183 


6197 


6212 














6168 


6-170 


6186 


6189 


6192 


6194 


6197 


6220 


6227 






6165 


6170 


6173 


6175 


6177 















1369* 1374* 4327 
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SEQ 0140 



SSAVRE 


0-11066 


5283* 


5393 
























$SAVR6 


041552 


5408* 


5416 


5417* 


5418* 


5438* 


















SSCOPE 


035040 


1353 


4369* 
























$SETUP« 


000137 


711/^ 


1352 


1353 


1355 


1357 


1359 


1361 


1362 


1363 


1365 


1379 


1406 


1409 






4297 


4370 


4434 


4467 


4475 


4752 


4929 


5434 












$STUP = 


177777 


711# 


























SSVLAD 


035246 


4380 


4409* 
























$SVPC 8 


000204 


726# 


731 
























$SWR » 


177400 


S^5ft 


521 


525 


526 


527 


528 


529 


530 


531 


532 


805 


806 


807 






1362 


1363 


1365 


1379 


1380 


1446 


1470 


1497 


1536 


1575 


1615 


1655 


1695 






1735 


1779 


1835 


1857 


1876 


1923 


1970 


2018 


2071 


2121 


2196 


2249 


2323 






2478 


2638 


2745 


2812 


2874 


2926 


2999 


3061 


3135 


3212 


3289 


3339 


3516 






3555 


3587 


3639 


3717 


3891 


4062 


4214 


4257 


4291 


4298 


4325 


4338 


4352 






4361 


4362 


4363 


4364 


4365 


4371 


4383 


4385 


4386 


4389 


4390 


4391 


4398 






4399 


4400 


4412 


4415 


441 B 


4425 


4426 


4427 


4428 


4429 


4445 


4452 


4464 






4468 


4480 


5433 






















SSWREG 


001250 


828* 


1400 
























$SWRMK« 


000000 


532 


533 






4387 


















STBIT 


035032 


1378* 


4342* 


4352* 


5434* 




















STESTN 


001232 


819«y 


4410* 
























$TIMES 


001212 


BOS* 


1362* 


4298* 


4398* 


4405 


4408* 


4418 














$TKB 


001 146 


784# 


4750 


4761 


4778 


4840 


4846 
















STKS 


001 144 


783* 


4750 


4759 


4775 


4787* 


4807* 


4838 


4844 












$TMPO 


001 176 


799* 


2343* 


2348 


2369* 


2374 


2395* 


2400 


2487* 


2492 


2513* 


2518 


2539« 


2544 






2565* 


2570 


2591* 


2596 


2663* 


2943* 


2973 


3010* 


3040 


3365* 


3372 


3663* 


3669« 






3673* 


3676* 


3680* 


3681 


6170 


6181 


6183 


6186 


6202 


6220 








$TMP1 


001200 


800* 


3362* 


3374* 


3377* 


3378 


3384* 


3389* 


3393* 


3394 


3422* 


3424* 


3430* 


3434* 






3440* 


3444* 


3450* 


3453* 


3459* 


3466* 


3473* 


3478* 


3485* 


3491* 


3599 '» 


3605* 


3609* 


$TMP2 


001202 


3610 
801* 


3366* 


sr-'s 


3821* 


3822 


3848* 


3849 


3980 


3981* 


4015* 


4017 


4149* 


4150 






4176* 


4177 


6202 






















$rM?3 


001204 


802* 


























$TMP4 


001206 


803* 


























$TMP5 


001210 


804* 


4940* 


4941* 


4947 




















$TN « 


000053 


515* 


521 


1438 


1446* 


1463 


1470* 


1488 


1497* 


1526 


1536* 


1542 


1564 


1575* 






1592 


1606 


1615* 


1632 


1646 


1655* 


1672 


1686 


1695* 


1712 


1726 


1735* 


1752 






1766 


1779/' 


1824 


1835* 


1848 


1857* 


1859 


1865 


1876* 


1911 


1923* 


1960 


1970* 






2005 


2018* 


2053 


2071* 


2110 


2121* 


2182 


2196* 


2235 


2249* 


2275 


2305 


2323* 






2465 


2478* 


2613 


2638* 


2705 


2727 


2745* 


2794 


2812* 


2862 


2874* 


2916 


2926* 






2989 


2999* 


3049 


3061* 


3122 


3135* 


3199 


3212* 


3274 


3289* 


3324 


3339* 


3503 






3516* 


3547 


3555* 


3574 


3587* 


3623 


3639* 


3704 


3717* 


3861 


3876 


3891* 


4031 






4049 


4062* 


4189 


4205 


4214* 


4247 


4257* 














$TPB 


001 152 


786* 


5030* 


5041 






















$TPFLG 


001 157 


790* 


4979 


5041 






















$TPS 


001 150 


785* 


5028 


5041 






















$TRAP 


041302 


1357 


5358* 
























$TRAP2 


041324 


5369* 


5380 
























$TRP X 


000015 


5373* 


5382* 


5363* 


5384* 


5385* 


5386* 


5387* 


5388 


5389* 


5390 


5391* 


S392# 


S393* 






5394* 


5395* 
























$TRPAD 


041336 


5363 


5380* 
























$TSTM 


000210 


750* 


























$TSTNM 


001 102 


763* 


4297- 


4360 


4387 


4409« 


4410 


4415 


4419 


4441 


4444 


4480 


4943 




STTYIN 


037406 


4866 


4867 


4885 


4903 


4917 


4921* 
















STYPBN 


040340 


5107* 


5386 
























STYPDS 


040642 


5211* 


5385 
























$TYPE 


037610 


4979* 


5072 


5373 


S381 
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5028* S029 



$TYPEC 


040022 


4809 


5009 


5016 


5023 


STYPEX 


040070 


5034 


5036 


5039* 




STYPOC 


040440 


5152* 


5382 






STYPON 


040454 


5151 


5154* 


5384 




STYPOS 


040414 


5147* 


5383 






$UNIT 


001240 


822* 








SUNITM 


000214 


752* 








$USWR 


001252 


829* 








SVECTI 


001276 


854* 








$VECT2 


001300 


855* 








SXTSTR 


035052 


4374* 








$$GET4a 


000001 


4325* 


4330 






SOFILL 


040637 


5148* 


5152* 


5162 


5197* 


$40CAT« 


**♦♦*« u 


4371 


4454 








052267 


713* 


717* 


726 


727* 






1350 


1379 


1380 


4310* 






4929* 


5041 


5093* 


S2GS* 


.$ASTA» 




5045 


5048 






.$X 


000204 


737* 


742 







729* 
4352 
5349* 



731* 
4354* 
5411 



737 
4418 
5437 



738* 
4419 
5445* 



740* 
4480 



742* 
4571* 



760* 
4750 



811 
4921* 



SEO 0141 



1342* 
4922 



CFKTHBO PDP 11/34 MEM MGNT DIAG MACY11 30A(1052) 27-UUN-78 09:33 PAGE 145 
CFKTHB.P11 27-JUN-78 09:27 CROSS REFERENCE TABLE — MACRO NAMES 



SEQ 0143 



ADDTST 


710# 


2337 


2363 


CDMMEN 


1# 


643* 




ENDCOM 


1* 


643* 




ERROR 


537* 


1303 


1333 




1715 


1750 


1755 




2029 


2041 


2130 




2524 


2550 


2576 




2953 


2961 


2968 




3240 


3247 


3261 




3493 


3533 


3567 




3869 


3905 


3923 




4141 


4155 


4168 


ESCAPE 


1* 


643* 




GcTPRI 


1* 


643* 


4338 


GETSWR 


1* 


643* 


1409# 




1438* 


1440 




M3G10 


1686* 


1688 




MSG1 1 


1726* 


1728 




MSG 12 


1766* 


1 768 




MSG13 


1824* 


1826 




MSG14 


1848* 


1850 




MSG 15 


1865* 


1867 




MSG 16 


191 1* 


1913 




MSG17 


1960* 


1962 




MSG2 


1463* 


1465 




MSG20 


2005* 


2007 




MSG21 


2053* 


2055 




MSG21 A 


2110* 


2112 




MSG21B 


2182* 


2184 




MSG21C 


2235* 


2237 




MSG22 


2305* 


2307 




M3G23 


2465* 


2467 




MSG24 


2613* 


2615 




MSG25 


2727* 


27^9 




MSG26 


2794* 


2796 




MSG27 


2862* 


2864 




MSGS 


1488* 


1490 




MSG30 


2916* 


2918 




MSG31 


2989* 


2991 




MSG31A 


3049* 


3051 




MSG32 


3121* 


3124 




MSG33 


3198* 


3201 




MSG34 


3273* 


3276 




MSG35 


3321* 


3326 




MSG36 


3502* 


3505 




MSG36A 


3547* 


3549 




MSG37 


3573* 


3576 




MSG4 


1526* 


1528 




V.SG40 


3622* 


3625 




MSG41 


3704* 


3706 




y.SG42 


3878* 


3880 




MSG43 


4049* 


4051 




MSG44 


4205* 


4207 




MSG45 


4247* 


4249 




MSGS 


1563* 


1566 




MSG6 


1606* 


1608 





3389 


3481 


2507 


3533 


1454 


1479 


1507 


1530 


1785 


1794 


1806 


1815 


2141 


2152 


3164 


3313 


3603 


2673 


3717 


3764 


3013 


3020 


3038 


3035 


3306 


3347 


3356 


3380 


3594 


3613 


3683 


3759 


3940 


3955 


3971 


3989 


4183 


4197 


4333 


4338 



3559 


3585 






1545 


1590 


1595 


1630 


1841 


1860 


1883 


1896 


3366 


2285 


2354 


2380 


3775 


2784 


2831 


2843 


3065 


3076 


3084 


3154 


3396 


3405 


3427 


3437 


3764 


3777 


3789 


3800 


4006 


4035 


4039 


4088 


4339 


4366 


4373 


4658 



1635 


1670 


1675 


1710 


1930 


1943 


1981 


1993 


2406 


3433 


3456 


3498 


2851 


3884 


2896 


3945 


3165 


3173 


3186 


3339 


3447 


3456 


3469 


3481 


3812 


3827 


3840 


385S 


4093 


4106 


41 18 


4139 


4673 


4686 


4700 
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CROSS 


REFERENCE 


TABLE 


— MACRO 


NAMES 












SEQ 


MSG7 


1646* 


1648 




























MULT 


1* 


643* 




























NEWTST 


1* 


643* 


1438 


1463 


1488 


1526 


1564 


1606 


1646 


1686 


1736 


1766 


1824 


1848 


1865 




191 1 


1960 


2005 


3053 


31 10 


2182 


3335 


3305 


3465 


2613 


2727 


3794 


2863 


3916 


3989 




3049 


3122 


3199 


3274 


3324 


3503 


3547 


3574 


3623 


3704 


3878 


4049 


4305 


4347 




POP 


1* 


643* 


5087 


5088 


5252 


5304 


5430 


5431 
















PUSH 


1* 


643* 


5048 


5050 


5071 


5311 


5384 


5401 


5407 














REPORT 


1* 


643* 




























SAVR 


710* 


4435 




























SCOPE 


538* 


1445 


1469 


1496 


1535 


1574 


1614 


1654 


1694 


1734 


1778 


1834 


1856 


1875 


1933 




1969 


2017 


2070 


2130 


3195 


2348 


3333 


3477 


2637 


2744 


2811 


3873 


3925 


3998 


3060 




3134 


321 1 


3288 


3338 


3515 


3554 


3586 


3638 


3716 


3890 


4061 


4213 


4256 


4396 




SETPRI 


1* 


643* 




























SETTRA 


5373* 


53':2 


5383 


5384 


5385 


5386 


5388 


5390 


5391 


5392 


5393 


5394 








SETUP 


1* 


643* 


1344 


























SKIP 


1* 


643* 


1542 


1593 


1632 


1673 


1713 


1753 


1859 


2275 


2705 


3861 


4031 


4189 




SLASH 


1* 


643* 




























SPACE 


543* 






























STARS 




643* 


724 


734 


736 


743 


756 


81 1 


814 


1284 


1291 


131 1 


1318 


1438 


1444 




1463 


1468 


1488 


1495 


1526 


1534 


1550 


1561 


1564 


1573 


1606 


1613 


1646 


1653 


1686 




1693 


1726 


1733 


1766 


1777 


1834 


1833 


1848 


1855 


1865 


1874 


191 1 


1921 


1960 


1968 




2005 


2016 


2053 


3069 


2110 


3119 


3183 


3194 


2235 


2247 


2305 


2321 


2465 


3476 


2613 




2636 


2727 


2743 


3794 


2810 


3863 


3873 


3904 


2914 


2916 


2924 


2989 


2997 


3049 


3059 




3103 


3118 


3122 


3133 


3199 


3310 


3374 


3387 


3324 


3337 


3503 


3514 


3547 


3553 


3574 




3585 


3623 


3637 


3696 


3701 


3704 


3715 


3878 


3889 


4049 


4060 


4205 


4213 


4347 


4255 




4287 


4357 


4421 


4483 


4576 


4583 


4595 


4601 


4611 


4619 


4640 


4648 


4709 


4733 


4749 




4752 


4828 


4857 


4964 


5043 


5100 


5134 


S301 


5368 


5313 


5353 


5397 


5413 






SWRSU 


1* 


643* 


1381* 


























TIMMSG 


710* 


1608 


1648 


1688 


1728 






















TIMTST 


710* 


1615 


1655 


1695 


1-15 






















TRMTRP 


5373* 






























TYPBIN 


1* 


643* 


4548 


























TYPDEC 


1* 


643* 


4311 


4318 


4541 


4947 




















TYPNAM 


1* 


643* 


1403 


























TYPNUM 


1* 


643* 




























TYPOCS 


1* 


643* 




























7YP0CT 


1* 


643* 


4507 


4534 


4770 


4944 




















TYPTXT 


1 * 


643* 


4307 


4314 
























USER 


710* 


880 




























WMSG 


710* 


2729 


2796 


























WTST 


710* 


2745 


2813 


























$$CMRE 


754* 


793 


794 


795 


796 


797 


798 


















$$CMTM 


754* 


799 


800 


801 


802 


803 


804 


















$$ESCA 


1* 


643* 




























$$NEWT 


1 * 


643* 


1438 


1463 


1488 


1526 


1564 


1606 


1646 


1686 


1726 


1766 


1824 


1848 


1865 




191 1 


1960 


2005 


3053 


31 10 


3183 


3335 


3305 


2465 


2613 


2727 


2794 


2862 


3916 


3989 




3049 


3122 


3199 


3374 


3324 


3503 


3547 


3574 


3623 


3704 


3878 


4049 


4205 


4247 




$$SET 


5373* 


5382 


5383 


5384 


5385 


5386 


S308 


5390 


5391 


5393 


5393 


5394 








$$SETM 


1397* 






























$$SETU 


1365* 




















2706 










$$SKIP 


1* 


643* 


1542 


1593 


1633 


1673 


1713 


1753 


1859 


3375 


3861 


4031 


4189 




.EQUAT 


1* 


515* 


533 


























.HEADE 


1* 


515* 


516 


























.KT1 1 


1* 


515* 


643 


























.SETUP 


1* 


515* 


711 


























.SWRHI 


1* 


515* 


531 
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. SWNLD 


533# 






. $ACT 1 


1 M 


515^ 


722 


. $ A P T B 


1 * 


8 1 2<^ 




. SAI'TH 


1 * 


515^ 




. $APT Y 


1 1t 


515* 


5041 


. $ASTA 


1 1t 






. SCATC 


1 * 


51 5# 




. SCMTA 


1 n 


51 5i» 


754 


. $DB2D 


1 * 






. $Dn!20 


1 * 


51 5** 


531 


. $D1 V 


1 * 






. tEfJP 


1 * 




^^1 o 


. iERRO 


1 


51 5ff 


441 a 


. $ E R T 


1 n 


51 J* 




. iMULT 


1 n 






. $POWE 


1 # 


5 1 5* 


5395 


. $R \N0 


1 * 






. BRDDE 


1 * 






> bnOOC 










1 * 


5' 5* 


4''47 


! £R2AZ 


1 n 






. i5AV| 


1 * 






. '6SB2D 


Id- 






.is 1320 


1* 






. 'iSCOP 


1 * 






.iSlZE 


1 * 














.STRAP 


1 * 


515* 


5350 


.tTYPB 


1 * 


515# 


5098 


.$TYPD 


1* 


515# 


5199 


.$TYPE 


1* 


515* 


4962 


.STYPO 


1# 


515* 


5122 


.$40CA 


1* 






. 1 170 


1^ 






. A3S. 


052267 


000 




ERRORS 


detected: 








CFKTHB.CFKTHB. LST/CRF/S0L»CFKTHB.SML,CFKTHB.P11 
RUN-TIME: 22 30 2 SECONDS 
RUN-TIME RATIO: 266/55=4.8 
CORE used: 39K (77 PAGES) 



